En op 17 augustus 2002 sprak Eugene van der Pijll:
> En op 18 augustus 2002 sprak [EMAIL PROTECTED]:
> > $_=$"x((1|1<<pop)-1)."/\\
> > ";print,s,(?<=\\)..,$&^v15.'|',eg,s,$,/\\,while+s+^ ++
> 
> $_=$"x~-(1|1<<pop)."/\\
> ";print,s/(?<=\\)../$&^v15.'|'/eg,s^$^/\\^while+s\^ \\

Actually, I think you don't need to do that. This works too, even for
argument 0. And please do not use double quotes where single quotes work
just as well:

$_=$"x(1<<pop).'/\
';print,s/(?<=\\)../$&^v15.'|'/eg,s^$^/\\^while+s\^ \\

(-ugene

Reply via email to