perl從文件中讀取數(shù)據(jù)并輸出的實現(xiàn)代碼
window下讀取某個文件,格式是:
open (filehand,"路徑e.g:d:\\data.txt");  
然后將打開的內(nèi)容賦值給一個變量:
$protein=<filehand>;  
附:一個讀取蛋白質(zhì)序列的程序。
#!/bin/perl
open (PROTEINFILE,"f:\\perl\\data.txt")||die("can not open the file!");
$protein =<PROTEINFILE>;
close PROTEINFILE;
print $protein;
結果如下:
F:\>perl\a.pl  
MNIDDKLEGLFLKCGGIDEMQSSRTMVVMGGVSGQSTVSGELQDSVLQDRSMPHQEILAADEVLQESEMRQQDMISHDEL  
MVHEETVKNDEEQMETHERLPQGLQYALNVPISVKQEITFTDVSEQLMRDKKQIR  
F:\>
相關文章
 Perl中使用File::Lockfile確保腳本單實例運行
這篇文章主要介紹了Perl中使用File::Lockfile確保腳本單實例運行的方法,本文直接給出實例,方法非常簡單,需要的朋友可以參考下2014-11-11
 perl中使用ip138網(wǎng)站查詢ip歸屬地腳本分享
這篇文章主要介紹了perl中使用ip138網(wǎng)站查詢ip歸屬地腳本分享,本文包含了處理HTML的部分,只保留IP歸屬地信息,需要的朋友可以參考下2014-09-09

