Re: Splitting and comparing file names



On Dec 14, 9:06 am, boyd <tbmoo...@xxxxxxxxxxx> wrote:
In article <1166114810.087246.179...@xxxxxxxxxxxxxxxxxxxxxxxxxxxx>,

# insert something like this:
use List::Util qw(sum); # normally put near the top.

$filename =~ s/.load$//;
my($host, @times) = split '#', $filename;
my $avg = sum(@times) / (scalar @times); # @times would work,
# but scalar guarantees the number of elements.

Thanks again for the help Boyd! I truly appreciate the help with this
and my previous post.

Regards,

Jake

.