Select Code to Download

foreach my $key (sort keys %clocks){
  print_clock_assertions(\{ $clocks{'$key'} });
}

foreach my $key (sort keys %clocks){
  print_clock_assertions(\{ $clocks{$key} });
}

foreach my $key (sort keys %clocks){
  print_clock_assertions($clocks{$key});
}

print STDOUT "ref 1 :$hashref->{'speed'}\n";

print STDOUT "ref 1 :", $hashref->{'speed'}, "\n";