print $in "$hu,$hd,$lt\n"; # no comma between $in and "..."