sub loop_through_hash{ my($hash) = @_; foreach $k (keys %hash){ print "$k => $hash{$k} }#end foreach loop }#end loop_through_hash [download]
In reply to lopping through a hash passed as a reference by mnlight