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:\>
上一篇：使用Perl创建指定编码格式(如utf-8)文件的实现代码
栏 目：perl
下一篇：PERL脚本 学习笔记
本文标题：perl从文件中读取数据并输出的实现代码
本文地址：http://www.codeinn.net/misctech/145283.html
