Perl入门（一）

概述以下在ubuntu11.10上运行 1.在用户lord( 本人)下新建temp文件 输入代码： $celsius = 20;while($celsius <=45){$fahrenheit =($celsius *9/5)+32;print "$celsius C is $fahrenheit F.\n";$celsius =$celsius +5;}在Terminal中输入命令：pe

以下在ubuntu11.10上运行

1.在用户lord( 本人)下新建temp文件

输入代码：

$celsius = 20;while($celsius <=45){$fahrenheit =($celsius *9/5)+32;print "$celsius C is $fahrenheit F.\n";$celsius =$celsius +5;}

在Terminal中输入命令：perl  temp

slave1@slave1-data:~$ perl -w temp20 C is 68 F.25 C is 77 F.30 C is 86 F.35 C is 95 F.40 C is 104 F.45 C is 113 F.

2.一个正则表达式用法

print "Enter a temperature in Celsius:\n";$celsius =<STDIN>;#从控制台输入chomp($celsius);#去掉换行符if($celsius =~ m/^[0-9]+$/){$fahrenheit =($celsius *9/5)+32;print "$celsius C is $fahrenheit F.\n";}else{print "Exception: input a number\n";}

『=～』 是“匹配”的意思

『m』 是match

/。。。/中是正则表达式

3.for语句

#! /usr/bin/perlfor $x (1..50){ print "The value of $x is $x\n";};

$x要在（）外边，与C风格不同，相当于for(int i=1;i<50;i++){}

the '\' tells perl totreat the next character as it looks.

4.while(){}和until(){}语句

$x = 0;while($x <= 50){ print "The value of $x is $x\n"; $x++;}

#! /usr/bin/perl$x = 0;until ($x > 50){ print "The value of $x is $x\n"; $x++;}

5.对文件的 *** 作

#!/usr/bin/perlopen(myfile,"G:\dataOfJava\template\admin-templates-1\admin_template\index.HTML");while(<myfile>){	print;	};close(myfile);

注意：1.文件路径不能有中文

            2.『\\』只针对于windows下的文件，在linux中用"/usr/bin/..."之类的

6.写入文件

#! /usr/bin/perlopen (file,">myfile.txt");print file "This is a test of something to be in this file";close file;

> 提示输入哪个文件 总结

以上是内存溢出为你收集整理的Perl入门（一）全部内容，希望文章能够帮你解决Perl入门（一）所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。