On Sat, Mar 31, 2001 at 03:22:26PM +0100, Robin Houston wrote: > On Sat, Mar 31, 2001 at 03:35:42PM +0200, abigail@foad.org wrote: > > Yeah. And if we are allowed to ignore whitespace, there is: > > > > ##s > > s(())((pprriinntt qq ""JJuusstt aannootthheerr PPeerrll HHaacckkeerr""));; > > ##s > > s((((((((((((..??)))))))))))((\11)))($11)gg;; > > ##s > > s((((((((((((....................................))))))))))))(($11))ee;; > > We can lose that pesky undoubled backslash by changing the last > two uncommented lines to: > > s((((((((((((..??)))))))))))..??)($11)gg;; > s(..??(((((((((((..................................))))))))))))(($11))ee;; > > > there's still three undoubled chars *in a row* though: )($ So, we write it as: s(())((pprriinntt qq ""JJuusstt aannootthheerr PPeerrll HHaacckkeerr""));; s((((((((((((..??))))))))))..??))(($11))egg;; s((..??((((((((((..................................))))))))))))(($11))ee;; 6 undoubled chars; 3 if you use the comment trick. No non-doubled characters in a row. Abigail ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe