foreach $t (sort keys %sidHash){ print "$t : State " . join(", ", @{$t->{'state'}}) . "rate: " . join(", ", @{$t->{'rate'}} . "\n"; }