perl第一弹-perl的特点
Posted 流浪骆驼
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了perl第一弹-perl的特点相关的知识,希望对你有一定的参考价值。
下面是一个perl脚本,当然这篇旨在使读者了解perl的特点,并非理解脚本具体含义。
阅读以下脚本,思考perl脚本存在哪些特点呢?
提示:
第6-29行为脚本正文,__END__表示脚本结束。
#!/usr/bin/perl
# shbang
# 告诉系统应当使用哪种程序来解释该脚本
# 屏幕输出What is your name?
print "What is your name? ";
# 读取用户的键盘输入,赋值给变量$name,并删除回车
chomp($name = <STDIN>);
# 屏幕输出Welcome, $name, are you ready to learn Perl now?
print "Welcome, $name, are you ready to learn Perl now? ";
# 读取用户的键盘输入,赋值给变量$response,并删除回车
chomp($response = <STDIN>);
# 将$response变量的值转换为小写
$response = lc($response);
# 判断$response变量的值是否等于yes或者y
if($response eq "yes" or $response eq "y"){
# 屏幕输出Great! Let's get started learning Perl.
print "Great! Let's get started learning Perl.\n";
# 否则
}else{
# 屏幕输出O.K. Try again later.
print "O.K. Try again later.\n";
}
# 获取当前时间,并赋值给变量$now
$now = localtime;
# 屏幕输出 $name, you ran this script on $now
# 其中$name变量来自第6行的用户输入
# $now变量来自第23行localtime函数,获取的当前时间
print "$name, you ran this script on $now.\n";
__END__
(Output)
What is your name? Ellie
Welcome, Ellie, are you ready to learn Perl now? yes
Great! Let's get started learning Perl.
Ellie, you ran this script on Wed Apr 4 21:53:21 2007.
答案:
ps:
看吧,你也可以看懂perl了~
以上是关于perl第一弹-perl的特点的主要内容,如果未能解决你的问题,请参考以下文章