Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: Golf: ROT-n

by BrowserUk (Patriarch)
on Nov 09, 2004 at 19:03 UTC ( [id://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

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
Domain Nodelet?
Node Status?
node history
Node Type: note [id://406433]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others taking refuge in the Monastery: (2)
As of 2024-04-20 05:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found