They do say that X% of any Perl program has already been written (add value of X to taste, 80% of all statistics are just made up on the spot anyway), but it seems that 100% of this has already been done. Oh well, it only took me 10 minutes to write it, and I learned a little while I was at it (I'd never used print << before - it was actually rather hard to find the docs for this feature, it isn't mentioned under the print command).

I'm also enjoying Perl more and more all the time.