Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: Golf: ROT-n

by BrowserUk (Pope)
on Nov 09, 2004 at 19:03 UTC ( #406433=note: print w/ replies, xml ) Need Help??


in reply to Golf: ROT-n

Not shorter (yet) but different. Maybe the approach can be improved?

       #        1         2         3         4         5
       #123456789 123456789 123456789 123456789 123456789 
perl -e"die map{($i)=@ARGV;$_++while$i--;chop}split'',pop" 4 pqrstuvwxyz

tuvwxyzabcd at -e line 1.


Examine what is said, not who speaks.
"Efficiency is intelligent laziness." -David Dunham
"Think for yourself!" - Abigail
"Memory, processor, disk in that order on the hardware side. Algorithm, algorithm, algorithm on the code side." - tachyon


Comment on Re: Golf: ROT-n
Replies are listed 'Best First'.
Re^2: Golf: ROT-n
by tilly (Archbishop) on Nov 09, 2004 at 19:31 UTC
    This generates an error on Perl 5.8.4 (Can't modify constant item in postincrement).

    I thought about a couple of variants of this idea (not this one though) but didn't find a way to get the stroke count low. Particularly not on my version of Perl.

      Strange. The output I showed was using 5.8.4 (AS810)

      [19:39:27.71] P:\test>perl -v This is perl, v5.8.4 built for MSWin32-x86-multi-thread (with 3 registered patches, see perl -V for more detail) Copyright 1987-2004, Larry Wall Binary build 810 provided by ActiveState Corp. http://www.ActiveState. +com ActiveState is a division of Sophos. Built Jun 1 2004 11:52:21 Perl may be copied only under the terms of either the Artistic License + or the GNU General Public License, which may be found in the Perl 5 source ki +t. Complete documentation for Perl, including FAQ lists, should be found +on this system using `man perl' or `perldoc perl'. If you have access to + the Internet, point your browser at http://www.perl.com/, the Perl Home Pa +ge. [19:40:24.59] P:\test>perl -e"die map{($i)=@ARGV;$_++while$i--;chop}sp +lit'',pop" 4 pqrstuvwxyz tuvwxyzabcd at -e line 1.

      I saw your for tr version just after I posted which is in a similar vien but much shorter. Nice work++.


      Examine what is said, not who speaks.
      "Efficiency is intelligent laziness." -David Dunham
      "Think for yourself!" - Abigail
      "Memory, processor, disk in that order on the hardware side. Algorithm, algorithm, algorithm on the code side." - tachyon
        Ah, quoting issue on Linux. y/'"/"'/ and all is fine.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (8)
As of 2015-07-31 02:21 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 (274 votes), past polls