佘小宝的爹 发表于 2015-12-29 11:18:35

perl学习2--处理用户输入

#!/usr/bin/perl -w
$madonna=<STDIN>;
if (defined($madonna)) {
print "The input was $madonna";
} else {
print "No input available!\n";
}
页: [1]
查看完整版本: perl学习2--处理用户输入