Ok I figured out a solution:
#!/usr/bin/perl -w
use strict;
use Storable;
my %total_bytes;
my $all = "**all machines**";
my $output_file = 'storage';
if (-e $output_file) {
my $hashref = retrieve $output_file;
%total_bytes = %$hashref;
} else {
print "$output_file has not
I'm trying to solve another problem in Intermediate Perl. Here is the
problem:
The program from Exercise 2 in Chapter 5 needs to read the entire
datafile each time it runs. However, the Professor has a new router
logfile each day and doesn't want to keep all that data in one giant
file that take
