Re: !~ /\w/ challenge, anyone?

Here's a totally different solution. It's unlikely to work on non-Linux platforms:

    ()=<>;$!=$=;($:,$,,$;,$")=$!=~/.(.)..(.)(.)..(.)/;
    $;++;$*++;$;++;$*++;$;++;`$:$,$;$" $. >&$*`;
[download]

Abigail

Comment on Re: !~ /\w/ challenge, anyone? Download Code

Replies are listed 'Best First'.
Re: Re: !~ /\w/ challenge, anyone? by belden (Friar) on Feb 06, 2003 at 00:16 UTC
Patch for Windows, AIX, OSF, Solaris. Hopefully this doesn't give the game away ;) ()=<>;$!++;$!+=$!;($",$,,$:)=$!=~/.(.)...(..)....(.).+/; $;++;$++;$;++;$++;$;++;`$:$,$" $. >&$*`; [download] blyman	[reply] [d/l]
Re: Re: !~ /\w/ challenge, anyone? by BrowserUk (Patriarch) on Feb 06, 2003 at 00:23 UTC
The question should be: What is the text of the error with the code 60 on a Linux platform that fits the pattern /.(e)..(c)(e)..(o)./? Examine what is said, not who speaks. The 7th Rule of perl club is -- pearl clubs are easily damaged. Use a diamond club instead.	[reply]
Re: Re: !~ /\w/ challenge, anyone? by John M. Dlugosz (Monsignor) on Feb 05, 2003 at 22:50 UTC
Very cute. I like the use of the magic in $!. But what does `noze` do on a Linux platform?	[reply] [d/l]
Re: !~ /\w/ challenge, anyone? by Abigail-II (Bishop) on Feb 05, 2003 at 23:03 UTC
I've no idea what `noze` does on a Linux platform. ;-) Abigail	[reply] [d/l]