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

 更新时间:2013年02月09日 22:09:19   作者:  
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中的模式匹配学习笔记

    Perl中的模式匹配学习笔记

    这篇文章主要介绍了Perl中的模式匹配学习笔记,本文讲解了匹配操作符、模式中的特殊字符、模式匹配选项等内容,需要的朋友可以参考下
    2015-02-02
  • perl中的字符串操作函数chomp与chop介绍

    perl中的字符串操作函数chomp与chop介绍

    这篇文章主要介绍了perl中的字符串操作函数chomp与chop介绍,chomp与chop都是用于去除字符串变量尾部的字符,但它们有各自的区别,需要的朋友可以参考下
    2015-02-02
  • About Perl(翻译Perl官网介绍)

    About Perl(翻译Perl官网介绍)

    这篇文章主要介绍了About Perl(翻译Perl官网介绍),本文翻译自Perl官网介绍,讲解什么是Perl、Perl的历史、Perl 5 特征、Perl在WEB环境下的使用等内容,需要的朋友可以参考下
    2015-06-06
  • Perl的Mail::POP3Client模块和Gmail通信实例

    Perl的Mail::POP3Client模块和Gmail通信实例

    这篇文章主要介绍了Perl的Mail::POP3Client模块和Gmail通信实例,本文直接给出实现代码,需要的朋友可以参考下
    2015-05-05
  • 在vim中添加perl注释时无法对齐问题的解决方法

    在vim中添加perl注释时无法对齐问题的解决方法

    在使用vim编辑perl脚本时,每当输入#号时,#号都会跑到行首问题,需要的朋友可以参考下
    2013-02-02
  • Perl中的控制结构学习笔记

    Perl中的控制结构学习笔记

    这篇文章主要介绍了Perl中的控制结构学习笔记,本文讲解了条件语句if、条件语句unless、循环语句while、循环语句until、for循环、foreach语句、循环控制等内容,需要的朋友可以参考下
    2014-11-11
  • Perl字符串处理函数大全

    Perl字符串处理函数大全

    本文重点讨论Perl字符串处理函数的用法,每种函数都有各自的特点和作用,需要的朋友可以参考下
    2017-09-09
  • perl的POD权限问题处理

    perl的POD权限问题处理

    今天我们继续查找mod_perl对req_header的处理,有需要的朋友建议参考学习之
    2013-02-02
  • perl use 命令中指定路径的方法

    perl use 命令中指定路径的方法

    如果要对使用的lib指定路径,可以使用下面的语法
    2013-02-02
  • Perl AnyEvent中的watcher实例

    Perl AnyEvent中的watcher实例

    这篇文章主要介绍了Perl AnyEvent中的watcher实例,关于AnyEvent请参阅的更多介绍请参阅文中的相关链接,需要的朋友可以参考下
    2014-09-09

最新评论