代码驿站移动版

当前位置：主页 > 脚本语言 > perl >

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

时间：2021-06-20 08:50:43 | 栏目：perl | 点击：次

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:\>

您可能感兴趣的文章:

相关文章