perl從文件中讀取數(shù)據(jù)并輸出的實(shí)現(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;
結(jié)果如下:
F:\>perl\a.pl
MNIDDKLEGLFLKCGGIDEMQSSRTMVVMGGVSGQSTVSGELQDSVLQDRSMPHQEILAADEVLQESEMRQQDMISHDEL
MVHEETVKNDEEQMETHERLPQGLQYALNVPISVKQEITFTDVSEQLMRDKKQIR
F:\>
相關(guān)文章
Perl中使用File::Lockfile確保腳本單實(shí)例運(yùn)行
這篇文章主要介紹了Perl中使用File::Lockfile確保腳本單實(shí)例運(yùn)行的方法,本文直接給出實(shí)例,方法非常簡單,需要的朋友可以參考下2014-11-11perl中使用ip138網(wǎng)站查詢ip歸屬地腳本分享
這篇文章主要介紹了perl中使用ip138網(wǎng)站查詢ip歸屬地腳本分享,本文包含了處理HTML的部分,只保留IP歸屬地信息,需要的朋友可以參考下2014-09-09