|
はじめまして。 いきなりですが、 >これを言われないような /dev/nul みたいな変数ってないんでしょうか。 (undef, undef, undef, $num1, $num2)=(0,1,2,3,4); こんなのでどうですか? |
|
>>1841 ふくし >>1843 68user >>1844 ふじ つぎのようにすれば文句をいわれませんでした。 #!/usr/bin/perl -w my ($login, $pass, $uid, $gid) = getpwnam('root'); print "$login:(password):$uid:$gid\n"; exit; my をとったものと、較べてください。 ちなみに動作環境は perl 5.00503 ないしは perl 5.6.0 です。 |