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

Perlコーディング初心 ..

574:nobodyさん
08/05/27 20:33:00
defined関数の存在が頭から抜けてたorz
$foo = $global_foo if $foo eq undef;
$bar = $global_foo if $bar eq undef;
ではなく
$foo = $global_foo unless defined $foo;
$bar = $global_foo unless defined $bar;
でお願いします。あと>>570-573サンクス、参考になります。

次ページ