- 671 名前：662 [2012/02/12(日) 21:48:59.07 ]
- ソース
my $debug = 1;
sub dbgPrint() {print @_ if ($debug);}
&dbgPrint "test\n";
実行結果
String found where operator expected at test.pl line 3, near "&dbgPrint "test\n""
(Missing operator before "test\n"?)
syntax error at test.pl line 3, near "&dbgPrint "test\n""
Execution of test.pl aborted due to compilation errors.
dbgPrintの呼び出しで括弧を付ければ動きました。
&dbgPrint("test\n");
