Nothin' but punctuation

Replies are listed 'Best First'.
Re: Nothin' but punctuation by holli (Abbot) on May 29, 2009 at 09:24 UTC
This is so f#cking super double ++ good =) It made my day. holli When you're up to your ass in alligators, it's difficult to remember that your original purpose was to drain the swamp.	[reply] [d/l]
Re: Nothin' but punctuation by tweetiepooh (Hermit) on Jun 02, 2009 at 15:54 UTC
Truly ++. I do however get the following as output on Perl 5.10 on Solaris/SPARC. `$# is no longer supported at -e line 1. $* is no longer supported at -e line 1. Just another Perl hacker.` [download]	[reply] [d/l]
Re^2: Nothin' but punctuation by Sue D. Nymme (Monk) on Jun 04, 2009 at 14:31 UTC
Rats! Well, here's a slightly modified form that doesn't give those warnings: `$=`;$_=\%!;($_)=/(.)/;$==++$\|;($.,$/,$,,$\,$",$;,$^,${^^},$~,$@,$:,@% +)=( $!=~/(.)(.).(.)(.)(.)(.)..(.)(.)(.)..(.)......(.)/,$",),$=++;$.++;$.++ +;$_ ++;$_++;($_,$\,$,) = ($~.$"."$;$/$%[$?]$_$\$,$:$%[$?]",$"&$~,${^^});$, +++; $,++;;$^\|=$";`$_${\}$,$/$:$;$~$@$%[$?]$.$~$@${^^}$%[$?]$;$\$"$^$~$@.>& +$=` [download] (apologies for the ugly wrapping)	[reply] [d/l]
Re: Nothin' but punctuation by John M. Dlugosz (Monsignor) on Jun 01, 2009 at 20:21 UTC
Care to explain how it works, roughly? For example what does the `$=` do on a *nix system, and what good is it if the result isn't being used in the code?	[reply] [d/l]
Re^2: Nothin' but punctuation by Sue D. Nymme (Monk) on Jun 01, 2009 at 21:06 UTC
Assuming you don't have a program named "60" (<grin>), it populates `$!` with a known error message, “No such file or directory”. Later, the line `$!=~/(.)(.).(.)(.)(.)(.)..(.)(.)(.)..(.)......(.)/` fetches some characters from that string. It then mangles and glues those characters together into a shell command, which is executed in the last ¾ of the fourth line. Hope this helps....	[reply] [d/l] [select]
Re^3: Nothin' but punctuation by Anonymous Monk on Sep 17, 2009 at 17:00 UTC
I think it gets the text of not existing file "60" and processes is further. Try to run it in a different locale :-) The last statement will not become `echo Just another Perl hacker.`	[reply]
Re^2: Nothin' but punctuation by ikegami (Patriarch) on Jun 01, 2009 at 20:36 UTC
It sets `$?` to -1 (any non-Windows system), and `$!` to `ENOENT` (any non-Windows system). `ENOENT` is `2/"No such file or directory"` on linux. I don't know if the program relies on this. ...unless, of course, you have a program named `60`.	[reply] [d/l] [select]