window下讀取某個文件，格式是：
open (filehand,"路徑e.g：d://data.txt"); 

然后將打開的內容賦值給一個變量：
$protein=<filehand>; 

附：一個讀取蛋白質序列的程序。

結果如下：
F:/>perl/a.pl 
MNIDDKLEGLFLKCGGIDEMQSSRTMVVMGGVSGQSTVSGELQDSVLQDRSMPHQEILAADEVLQESEMRQQDMISHDEL 
MVHEETVKNDEEQMETHERLPQGLQYALNVPISVKQEITFTDVSEQLMRDKKQIR 

F:/>