in reply to Re: Waiting for file creation
in thread Waiting for file creation
Not really help to your problem, just a few comments:
use strict; use warnings;
is supposed to glob the parameters (expand *.txt to the list of files that match that wildcard) right? You might like G better.@logs = <@ARGV>;
would be better writen like this:@tokens = split("\t",$currentLine); my @temp = ($tokens[1], $tokens[2], $tokens[3], $tokens[4]); $reports{$tokens[0]}=\@temp; my @data=(); $results{$tokens[0]}=\@data;
my ($rep, @tokens) = split("\t",$currentLine); $reports{$rep}=\@tokens; $results{$rep}=[];
Jenda
Always code as if the guy who ends up maintaining your code
will be a violent psychopath who knows where you live.
-- Rick Osborne
Edit by castaway: Closed small tag in signature
|
|---|