Perlコーディング初心者質問スレ Part 38

[0283 nobodyさん 04/10/22 10:48:37 ID:???]

Cだと入力がCtrl+D(windowsはCtrl+Z)だとプログラム終了ってのを
if (nyuryoku == '\0') {exit(0);}
て書けるけど、perlだとどう書きますか。以下の何入れても
quer!が出ちゃうんです。
$var=<STDIN>;
chomp($var);
if ($var eq "\0") {
exit(0);
} else {
print "quer!\n";
}