Select Code to Download

#! perl
use strict;
...
print  "MyText" . $$ref_HoH{$var}{$key} . "ishere.\n";      # concaten
+ated
printf "MyText%sishere.\n", $ref_HoH->{$var}{$key};         # template
+d
printf "MyText%sishere.\n", $$ref_HoH{$var}{$key};          # template
+d