jingshen 发表于 2017-5-19 09:59:59

perl接收地字符串如何比较

#! /usr/bin/perl
chomp($line=<STDIN>);print '$line:';
print $line;
print "\n";
if($line eq 'abc'){
print "That was same!\n";
}else{
print "That was different!\n";
}

注释:在第二行中,接受完字符串后,必须用chomp去掉回车符,这样才能得到我们想要的输入字符串。
页: [1]
查看完整版本: perl接收地字符串如何比较