71 characters: print$_="Happy birthday to you,\n"x2;s/,$/./;s/.{6},/dear perl5,/;print -Mark ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe