文字列を解析してパーツを配列に配置してから、配列コンポーネントを新しい変数に割り当てようとしています。私はこれを私のコードでまったく同じ方法で実行しましたが、機能しますが、失敗し、理由がわかりません。シンプルなことだと思いますが、近すぎて見えません。
sub timeDiff {
my ($tday,$tmon,$tyear,$pday,$pmon,$pyear,$tvalue,$pvalue,$reset);
my (@arrSplitTDate,@arrSplitPDate,$arrSplitTDate,$arrSplitPDate);
$tvalue = $_[0];
$pvalue = $_[1];
print $tvalue;
print $pvalue;
@arrSplitTDate = split(/\//, $tvalue);
$tday = $arrSplitTdate[1];
$tmon = $arrSplitTdate[0];
$tyear = $arrSplitTdate[2];
print $tday . "\n";
print $tmon . "\n";
print $tyear . "\n";
}
これはエラーです:
Global symbol "@arrSplitTdate" requires explicit package name at LargeLDAPSearch.pl line 173, <DATA> line 558.
誰かがエラーの理由を見ますか?ありがとうございました。