- Perlについての質問箱 64箱目 [転載禁止]©2ch.net
231 ：デフォルトの名無しさん[sage]：2015/04/23(木) 18:44:54.11 ID:uaw1qxyQ - 今日の無駄にハマった記述
$::fnc{ shift @in }->(@in)
shiftが実行されてるのに値が捨てられてねぇ
|
- Perlについての質問箱 64箱目 [転載禁止]©2ch.net
232 ：デフォルトの名無しさん[sage]：2015/04/23(木) 22:33:20.15 ID:uaw1qxyQ - 久しぶりにPerlをやったら数値の初期化がわからんくなった
-------------------------------------
# @_ は標準入力から入ってきた数字の文字。shiftすると0が出てくる。
my @ccc = qw(aa bb cc dd ee);
$aa[0]->{'bbb'}->{ $ccc[shift] } = 1;
↓
Use of uninitialized value in array element
-------------------------------------------
$aa[0]->{'bbb'}->{ $ccc[(shift) + 0] } = 1; # +0して数値だと教えてやる
↓
Use of uninitialized value in array element
--------------------------------------------
my $SUUTI = int( (shift) + 0 ); #もうこれは絶対数値だろ
$aa[0]->{'bbb'}->{ $ccc[$SUUTI] } = 1;
↓
Use of uninitialized value in array element
--------------------------------------------
どれも全部警告が出る以外は正しく動作します。
もう警告消そうかな…
|
- Perlについての質問箱 64箱目 [転載禁止]©2ch.net
234 ：デフォルトの名無しさん[sage]：2015/04/23(木) 23:31:29.88 ID:uaw1qxyQ - 天才
0を受け取ってたのが勘違いに拍車をかけていた
|