0

我正在尝试解析一个字符串并将这些部分放在一个数组中，然后将数组组件分配给新变量。我在我的代码中以完全相同的方式完成了此操作并且它可以工作，但现在它失败了，我不知道为什么。我认为这很简单，我离得太近了，看不到它。

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.

有人看到错误的原因吗？谢谢你。

4

1 回答 1

6

您的 camelCasing 在变量声明和预期用途之间是不同的。

arrSplitTDate对比arrSplitTdate

于 2012-04-05T17:44:42.130 回答