Richard Proctor wrote:
>
> for(0..3){print"Happy birthday ".(/2/?"dear perl5":"to you").(/3/?".":",")."\n"}
>
> Can anybody get it smaller...
@v=('Happy birthday to you')x4;$v[2]=~s/to.*/dear perl5/;$"=";\n";print"@v.\n"
--
John Porter
==== Want to unsubscribe from Fun With Perl? Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
==== unsubscribe