Select Code to Download

 

#!/usr/bin/perl -w
...
    #This example was given by PerlMonks
    print Dumper(\%joined_FS);

#Error:

Not a HASH reference at perl_script_work2.pl line 2441.
# Looks like your test exited with 255 just after 2.

    $VAR1 = {
          'Tom' => {
...
                          'week3' => 5
                       }
    };