Methinks FunkyMonk hit this on the head....
and adding Data::Dumper to the mix above,

use Data::Dumper;
print Dumper %hash;
[download]

gives you reasonable (readable) output:

$VAR1 = 'Pierce';
$VAR2 = {
          'Jerrad' => '96'
        };
$VAR3 = 'Lateur';
$VAR4 = {
          'Bart' => '97'
        };
$VAR5 = 'Miller';
$VAR6 = {
          'Katie' => '86'
        };
$VAR7 = 'Unknown';
$VAR8 = {
          'planetscape' => '101'
        };
[download]