Give credit where credit is due. Turnstep gave me the tip on "$^T"$$" a while back. I'm glad you liked it anyway. Live and learn, I say!

#!/home/bbq/bin/perl
# Trust no1!