On Sun, Apr 01, 2001 at 03:20:09PM +0200, Eugene van der Pijll wrote: > abigail@foad.org wrote: > > > 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. > > That second line can be changed to > > y y--uu"" yyss;; > > If you ignore whitespace, this has no undoubled characters. Cool. So, if we ignore whitespace, then: ##s s(())((pprriinntt qq ""JJuusstt aannootthheerr PPeerrll HHaacckkeerr""));; y y--uu"" yyss;;##s s((..??((((((((((..................................))))))))))))(($11))ee;; has only one non-doubled character left. Abigail ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe