| Subject: | MultiTail function parameter not executing correctly |
Hi,
Module Name: MultiTail
Module Version: 0.5
OS Version: Windows XP(cygwin), Linux, SunOS
Perl Version: 5.8.2
I have tried to make contact with the developer of this module but all email address are stale. I have attached a new version of the module as the change was very small, this already contains the fix. I have listed the change below, the issue relates to the read function in the perl module.
Show quoted text
----------------Existing code------------------------------------
# Run custom function Pass complete array to custom user function
if ( $rFD->{'Function'} ) {
foreach my $FH ( @{$rFD->{'FileArray'}} ) {
push(@TotalArray,@{$FH->{LineArray}});
}
&{$rFD->{'Function'}}(\@TotalArray)
}
#
return($rFD);
}
------------------------------------------------------------------
--------------Adjusted code---------------------------------------
# Run custom function Pass complete array to custom user function
if ( $rFD->{'Function'} ) {
foreach my $FH ( @{$rFD->{'FileArray'}} ) {
push(@TotalArray,@{$FH->{LineArray}});
}
&{$rFD->{'Function'}}(\@TotalArray) if @TotalArray
}
#
return($rFD);
}
-------------------------------------------------------------------
If there are any issues relating to the above, please let me know.
Kind Regards
James
Message body not shown because it is not plain text.