I was just about to post this snippet. Just as well I checked grinder's archive first. :-)

Anyway, here was my version:

    # Change the title of your xterm

    perl -e 'print "\c[];@ARGV\a"' Some title here
[download]

--
John.