脚本专栏 
首页 > 脚本专栏 > 浏览文章

perl从文件中读取数据并输出的实现代码

(编辑:jimmy 日期: 2024/11/27 浏览:3 次 )

window下读取某个文件,格式是:
open (filehand,"路径e.g:d:\\data.txt"); 

然后将打开的内容赋值给一个变量:
$protein=<filehand>; 

附:一个读取蛋白质序列的程序。

复制代码 代码如下:
#!/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高级排序,&lt;=&gt;操作符,飞船操作符
下一篇:perl处理csv文件的小例子
友情链接:杰晶网络 DDR爱好者之家 南强小屋 黑松山资源网 白云城资源网 网站地图 SiteMap