X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCron.pm;h=c0565fa1e9e8268b2c3c8aed8719398227f91409;hb=918827ec5a9023edeb2ce0140692566591af0af8;hp=94c1cad0450573d6399a08fdc5ab3c4c9c57515b;hpb=a3fd9341b7ce57dcc058b82cfba3f40f15631241;p=spider.git diff --git a/perl/DXCron.pm b/perl/DXCron.pm index 94c1cad0..c0565fa1 100644 --- a/perl/DXCron.pm +++ b/perl/DXCron.pm @@ -12,7 +12,7 @@ use DXVars; use DXUtil; use DXM; use DXDebug; -use FileHandle; +use IO::File; use Carp; use strict; @@ -58,7 +58,7 @@ sub init sub cread { my $fn = shift; - my $fh = new FileHandle; + my $fh = new IO::File; my $line = 0; dbg('cron', "cron: reading $fn\n");