my %arrays;
$arrays{bart} = [ 1, 2, 3, 4, 5 ];
$arrays{homer} = [ 80, 42, 33, 51, 0 ];
print $arrays{homer}[3], "\n";