llgd.net
当前位置:首页 >> pErl怎么读 >>

pErl怎么读

英文原文: perl 英式音标: [pɜːl] 美式音标: [pɝl]

最简单的是用@ARGV获得命令后面的参数表 如执行“perl ppp.pl 1 2 3 4 5” ppp.pl后面跟着5个参数,在程序中可以直接通过调用$ARGV[0],$ARGV[1],$ARGV[2],$ARGV[3],$ARGV[4]来分别调龋

具体函数我不清楚是否可以直接实现,但是可以通过变相实现。 #!/usr/bin/perl -w use strict; my $string = "China"; my @Array; for(my $i = 0; $i < length($string); $i++){ $Array[$i] = substr($string,$i,1); } for(my $i = 0; $i < @Arra...

my $file = "File"; # 将 File 改成你的档案路径.open F, $file or die "Can't open file '$file'for read. $!" ; my $line = ; #读一行close F; print $line; #将读了那行打印出来

如:txt中的数据(按行排列的) Steve Blenheim 101 Betty Boop 201 Igor Chevsky 301 Norma Cord 401 Jonathan DeLoach 501 Karen Evich 601 open STDIN,"date.txt" or die "cannot open for :$!"; while(@date = ){ chomp@a; }

open FILE, 'AA.TXT' or die; my @lines = split ( , '\n' ); my %values; foreach my $line (@lines) { if ( $line =~ /^\s*(\S+)\s*=\s*(\S+)\s*$/ ) { $values{$1} = $2; } }

最简单的答案就是 "自动侦测" (在 5.12 之後) 详细点, 可分两个层次来回答. (更详细请 perldoc perlunicode ) 第一个是, 让编译器读得懂您的原码, 那就是刚说的, 自动侦测, 不论您写的是 ansi, utf8, 16... 有 BOM 的也会自动侦测. 但另一个层次...

open(A,"dat");while(my $line=){ @sss = split($line,' '); print $sss[1];}

#!/usr/bin/perl -w print"Enter first number:" chomp (my $one=); print "$one\n"; 一次类推,输入第二,第三个数

my $path="f:/drl"; #设置查询的目录 #需要把这个文件句柄修改为可持续添加的格式 : ">>" open OUT, ">>f:/TMp/dd" or die "Can't create output file"; opendir(TEMPDIR, $path) or die "can't open it:$!"; my @dir = grep/.drl/g, readdir TE...

网站首页 | 网站地图
All rights reserved Powered by www.llgd.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com