in reply to print out keys of hash with carriage returns
map{print RPTOUT "$_\n"} keys %tapeid; [download]
That is indeed another way to do the same thing, but many argue against using map in void context. In older versions of perl, it was inefficient, because it would build a list of return values. In newer versions of perl, it's just bad style.