linux下安装perl
curl -L http://xrl.us/installperlnix | bash
一个简单的摄氏温度与华氏温度的perl转换脚本 sample
$celsius = 30;
$fahrenheit = ($celsius * 9 / 5) + 32;
print "$celsius C is $fahrenheit F.\n";
使用 perl -w sample执行,获得结果
30 C is 86 F.
Perl也提供了跟其他流行语言类似的控制结构
$celsius = 20;
while($celsius<=45)
{
$fahrenheit = ($celsius * 9 / 5) + 32;
print "$celsius C is $fahrenheit F.\n";
$celsius = $celsius + 5;
}
Perl可以以多种方式使用正则表达式,最简单的就是检查变量中的文本能否由某个正则表达式匹配,如判断$reply是否全部由数字构成:
reply = 123;
if( $reply =~ m/^[0-9]+$/){
print "only digits\n";
}else{
print "not only digits\n";
}
其中 =~ 读作 匹配, m/ /表示的要匹配的正则表达式
print "Enter a temperature in Celsius:\n";
$celsius = <STDIN>;#从用户处接受一个输入
chomp($celsius);#去掉$celsius后面的换行符
if( $celsius =~ m/^[0-9]+$/){
$fahrenheit = ($celsius * 9 / 5) +32;
print "$celsius C is $fahrenheit F\n";
}else{
print "Expecting a number, so I don't understand \"$celsius\"\n";#使用到了转移字符"\"
}