Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Nothin' but punctuation

by tweetiepooh (Friar)
on Jun 02, 2009 at 15:54 UTC ( #767654=note: print w/ replies, xml ) Need Help??


in reply to Nothin' but punctuation

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.


Comment on Re: Nothin' but punctuation
Download Code
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:

    `$=`;$_=\%!;($_)=/(.)/;$==++$|;($.,$/,$,,$\,$",$;,$^,${^^},$~,$@,$:,@% +)=( $!=~/(.)(.).(.)(.)(.)(.)..(.)(.)(.)..(.)......(.)/,$",),$=++;$.++;$.++ +;$_ ++;$_++;($_,$\,$,) = ($~.$"."$;$/$%[$?]$_$\$,$:$%[$?]",$"&$~,${^^});$, +++; $,++;;$^|=$";`$_${\}$,$/$:$;$~$@$%[$?]$.$~$@${^^}$%[$?]$;$\$"$^$~$@.>& +$=`

    (apologies for the ugly wrapping)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://767654]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (4)
As of 2015-07-06 00:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (68 votes), past polls