Select Code to Download

#!/usr/bin/env perl
#$Name$
#$Id$
...
printf($uHHash{uHANDLE} "Output is here (%s) !\n","HJGKJGJHJLHL");
close($uHHash{uHANDLE});
exit(0);

 ...
my $uuh = $uHHash{uHANDLE};
printf($uuh "Output is here (%s) !\n","HJGKJGJHJLHL");
close($uHHash{uHANDLE});
exit(0);