一,示例一
#!/usr/bin/perl print "what's your name? "; chomp($name= <STDIN>); print "welcome, $name,are you ready learn Perl now? "; chomp($response = <STDIN>); if ($response eq "yes" or $response eq "y") { print "Great! Let's get started learning Perl by example.\n"; } else { print "O.K. Try again later.\n" } $now = localtime; print "$name,you ran this script on $now.\n";
解释
01行是标示解释器是perl执行
02用print打印到屏幕输出,perl用print "显示内容";即可
03chomp去掉最后一个字符,即去掉换行符
$name= <STDIN>是设置一个变量$name,来自标准输入<STDIN>,
需要注意的是perl中的变量是$开头
注意perl的变量无需申明即可使用,非常灵活
运行如下
04和05同理
06是一个if语句判断,格式为
if (条件1成立){ 执行语句1 } else { 执行语句2 }
$response eq "yes" or $response eq "y"的意思是变量$response的值为yes,或是y
12是设定一个变量now,来自perl的内建函数localtime
13是显示
以上是小编为您精心准备的的内容,在的博客、问答、公众号、人物、课程等栏目也有的相关内容,欢迎继续使用右上角搜索按钮进行搜索变量
, perl
, response
, 语句
, name
, print
, Perl变量
Perl学习
,以便于您获取更多的相关知识。
时间: 2024-08-02 21:11:14