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:\>
您可能感兴趣的文章:
如您对本文有疑问或者有任何想说的,请点击进行留言回复,万千网友为您解惑!
网友评论