程嶏清单6-6.txt

来自「< linux网络编程工具>>配套源码」· 文本 代码 · 共 15 行

print "Please input the number : \n";
$number = <STDIN>;
chomp($number);
if ($number > 0) {
    print("plus\n");
}
else {
if($number < 0){
print("minus\n");
} 
else{
        print("zero\n");
}
}