foreach my $key (sort keys %clocks){
  print_clock_assertions({ $clocks{$key} });       #line 32
}
sub print_clock_assertions {
  my($hashref)=$_[0];
  print STDOUT "ref 1 :$hashref->{'speed'}\n";     #line 44
  }