window下讀取某個文件，格式是：
open (filehand,"路徑e.g：d:\\data.txt");
然后將打開的內(nèi)容賦值給一個變量：
$protein=filehand>;
附：一個讀取蛋白質(zhì)序列的程序。
復(fù)制代碼 代碼如下:
#!/bin/perl
open (PROTEINFILE,"f:\\perl\\data.txt")||die("can not open the file!");
$protein =PROTEINFILE>;
close PROTEINFILE;
print $protein;
結(jié)果如下：
F:\&;perl\a.pl
MNIDDKLEGLFLKCGGIDEMQSSRTMVVMGGVSGQSTVSGELQDSVLQDRSMPHQEILAADEVLQESEMRQQDMISHDEL
MVHEETVKNDEEQMETHERLPQGLQYALNVPISVKQEITFTDVSEQLMRDKKQIR
F:\&;
