perl从文件中读取数据并输出的实现代码
摘要:window下读取某个文件,格式是:open(filehand,"路径e.g:d:data.txt");然后将打开的内容赋值给一个变量:$p...
window下读取某个文件,格式是:
open (filehand,"路径e.g:d:data.txt");
然后将打开的内容赋值给一个变量:
$protein=<filehand>;
附:一个读取蛋白质序列的程序。
复制代码 代码如下:
#!/bin/perl
open (PROTEINFILE,"f:perldata.txt")||die("can not open the file!");
$protein =<PROTEINFILE>;
close PROTEINFILE;
print $protein;
结果如下:
F:>perla.pl
MNIDDKLEGLFLKCGGIDEMQSSRTMVVMGGVSGQSTVSGELQDSVLQDRSMPHQEILAADEVLQESEMRQQDMISHDEL
MVHEETVKNDEEQMETHERLPQGLQYALNVPISVKQEITFTDVSEQLMRDKKQIR
F:>
【perl从文件中读取数据并输出的实现代码】相关文章:
★ Perl使用File::Basename获取文件扩展名的代码
★ 使用Perl创建指定编码格式(如utf-8)文件的实现代码
上一篇:
perl处理csv文件的小例子