for (keys %a) 
   print("$a{$_}\n");
   print("$b{$_}\n");
   print("$c{$_}\n");
}
[download]