资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

Perl文件的读写操作介绍

本篇内容主要讲解“Perl文件的读写操作介绍”,感兴趣的朋友不妨来看看。本文介绍的方法操作简单快捷,实用性强。下面就让小编来带大家学习“Perl文件的读写操作介绍”吧!

南岔ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景,ssl证书未来市场广阔!成为成都创新互联公司的ssl证书销售渠道,可以享受市场价格4-6折优惠!如果有意向欢迎电话联系或者加微信:18980820575(备注:SSL证书合作)期待与您的合作!

基本的I/O操作:

输出:

print “Hello\n”;

print “Say \”Hello\” to NG” ,  ”\n”;

 “<<”(本地文档操作符)使用格式:

print <<“文档标志”

输出内容

文档标志

1 :“<<”与“文档标志”之间不能有空格;

2 :末尾的文档标志应顶头书写,标识输出结束

输入$AGRV[0]

读取标准输入:$line=;

文件输入:

#打开句柄:

open IN,“<$infile” or die$!;    #读文件

# 或者:open IN,$infile ordie$!;

my $line=;                            # <> 钻石符

print $line;

close IN;                           #关闭句柄

输出到文件

#打开句柄:

open OUT,”>”,$outfile or die$!; # 打开文件$outfile

# 或者:openOUT,”>$outfile” or die$!;

#追加到文件(原来文件中的内容保留):

open OUT,”>>$outfile” or die$!;

#输出内容到文件:

print OUT “Hello, NG\n”; #输入内容Hello NG到文件中

#关闭句柄:

close OUT; # 输出结束

$/(当前输入记录分隔符,默认是换行符)的使用:

输入文件test.fasta:

>Scaffold1

AAAAATCTA

GACGA

>Scaffold2

ATCTAAATAT

TTTAAC

open IN,”

my $line = ;print $line;    #显示:>Scaffold1

$line = ;print $line;                    #显示:AAAAATCTA

$line = ;print $line;                    #显示:GACGA

close IN;

$/=“>”;              #把输入记录分隔符改为”>”

open IN,”

my $line = ;

print $line;      #显示:>

$line = ;

print $line;

close IN;

#显示:

>Scaffold1

AAAAATCTA

GACGA

只输出第一条序列:

open IN,”

$/=“>”;                     # 把输入记录分隔符改为”>”

;                           #跳过第一个”>”之前的内容

my $line = ;

chomp $line;             # 删掉末尾的”>”

print “>”,$line;

close IN;

$/=“\n”;            # 把输入记录分隔符改为”\n”

#显示

>Scaffold1

AAAAATCTA

GACGA

到此,相信大家对“Perl文件的读写操作介绍”有了更深的了解,不妨来实际操作一番吧!这里是创新互联网站,更多相关内容可以进入相关频道进行查询,关注我们,继续学习!


文章标题:Perl文件的读写操作介绍
链接地址:http://www.cdkjz.cn/article/jgcedp.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

大客户专线   成都:13518219792   座机:028-86922220