为什么不能运行split函数？

[szsailing]

程序中含有
@predate=split (//,$predate);
print ($predate[0]."\t".$predate[1]."\n");

一运行程序，出现如下出错信息：（35和37行就是上面那两个语句）
Global symbol "@predate" requires explicit package name at billingtest.pl line 35.
Global symbol "@predate" requires explicit package name at billingtest.pl line 37.
Global symbol "@predate" requires explicit package name at billingtest.pl line 37.
Execution of billingtest.pl aborted due to compilation errors.

那位大侠能告诉我为什么？

[beckheng]

yes!

[domy]

35行前加
no strict;
^_^

[netken]

开头别用 use strict;
或加 my @predata ; my $predate

[gamelife]

我不喜欢加use strict；但是程序规模大一点，use strict；的好处就显而易见了^-^