Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re^3: Refactoring Perl 4 - Replace Temp with Query

by shmem (Chancellor)
on Jul 31, 2007 at 12:40 UTC ( [id://629818]=note: print w/replies, xml ) Need Help??


in reply to Re^2: Refactoring Perl 4 - Replace Temp with Query
in thread Refactoring Perl #4 - Replace Temp with Query

That is refactoring Perl 4, as in the latest in a series

I'm looking forward to "refactoring Perl 6" :-P

My previous post has been a (unfunny?) hint at the title being misleading. IMHO the dash is misplaced, and saying "refactoring Perl - 4. Replace Temp with Query" would avoid that type of "confusion" :-)

--shmem

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}
  • Comment on Re^3: Refactoring Perl 4 - Replace Temp with Query

Replies are listed 'Best First'.
Re^4: Refactoring Perl 4 - Replace Temp with Query
by agianni (Hermit) on Jul 31, 2007 at 12:54 UTC

    Definitely, you had me confused initially, but your humor was appreciated :) I have actually gone back and updated the titles of the root nodes to place number signs before the number in the series and will utilize that convention from here on out.

    perl -e 'split//,q{john hurl, pest caretaker}and(map{print @_[$_]}(joi +n(q{},map{sprintf(qq{%010u},$_)}(2**2*307*4993,5*101*641*5261,7*59*79 +*36997,13*17*71*45131,3**2*67*89*167*181))=~/\d{2}/g));'

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others rifling through the Monastery: (6)
As of 2024-04-18 12:14 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found