On Tue, Oct 19, 1999 at 01:33:27PM -0500, Andy Lester wrote: > > @v=('Happy birthday to you')x4;$v[2]=~s/to.*/dear perl5/;$"=";\n";print"@v.\n" > > I got it down to 73: > $a="Happy birthday";print join",\n",$b="$a to you",$b,"$a dear Perl5",$b; > > Oooh, wait, save a character by setting $, > $,=",\n";$a="Happy birthday";print $b="$a to you",$b,"$a dear Perl5",$b; > Both of those omit the ".\n" at the end. (Phew! ;) Ronald ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe