John Doe schreef:
> while (<DATA>) {
> my @fields=split /\s+/, $_;
Or
my @fields = split '';
or
my @fields = split;
> my $time_diff=diff(@{$table{$userno}}, $date, $time);
Those $date and $time should be without DST-delta.
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
