Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
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
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 romping around the Monastery: (13)
As of 2014-09-17 13:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (81 votes), past polls