Perl 4 sa

提纲读写文件变量逻辑控制胶水

开始！Perlit！1、创建一个it.pl文件2、perl it.plperl –e “print ‘hello,world’”

Perl 读文件open $fh,’<’,’/etc/passwd’;while(<$fh>){print $_;}

Perl写文件open$fh,”>”,”123.txt”;print $fh “write it down.”;

标量 scalarmy $string = ‘曾文杰’;my $number = 5143;

数组 arraymy @person = (‘曾文杰’,’唐骏’,’张阳’);my @code = (5143,250,5145);

哈希 hash%person = ( “5143” => “曾文杰",“250” => “唐骏",“5145” => “张阳", );

ifif ($name eq “张阳") { print “welcome"; }else{ print “get out”;}if ($age == 60){ print “oldman"; }

whilewhile($foo < 100){ print $foo++;}

forfor($i=1;$i<100;$i++){print $_;}for(1..99){print $_;}

foreachforeach my $person (‘超人’, ’钢铁侠’, ’闪电侠’){print $person;}

更多控制google循序渐进、按需索求

sedperl -pi -e 's/aaa/bbb/' filename

awkperl -lane 'print $F[0] + $F[-2]'

更多内容子函数、模块OOP正则表达式程序打包CPAN

进一步学习perldoc《Perl语言入门》

拜谁所赐?LarryWallCPANAuthors

More Related Content