Very clever, however, you might want to mention that this isn't actually a perl script (its a shell command containing text which is piped to a perl 1 liner), and entire text should just be dumped onto the command line. Also, Win32 users won't be able to run this, so don't even try :)