http://www.perlmonks.org?node_id=406387


in reply to Golf: ROT-n

I could make it to 37.

# 1 2 3 # 3456789 123456789 123456789 123456789 print map{chr$ARGV[0]+ord}split//,pop # sadly i could not come up with a split-less soution that # is short enough

Update: ROT is for ROTate, so this is not a solution to the problem. Working on it...

Update2: changed HTML to properly hide code

--
http://fruiture.de

Replies are listed 'Best First'.
Re^2: Golf: ROT-n
by fruiture (Curate) on Nov 09, 2004 at 17:15 UTC

    ok, solving the problem, 58, or 59 if the ambiguity warning disturbs you.

    # 1 2 3 4 5 # 3456789 123456789 123456789 123456789 123456789 123456789 print map{chr+(($_=$ARGV[0]+ord)>122?-26:0)+$_}split//,pop ; print map{chr((($_=$ARGV[0]+ord)>122?-26:0)+$_)}split//,pop ;

    update: changed hiding code here, too

    --
    http://fruiture.de
Re^2: Golf: ROT-n
by hardburn (Abbot) on Nov 09, 2004 at 16:51 UTC

    You got hit by the same bug I did. See dragonchild's first response.

    "There is no shame in being self-taught, only in not trying to learn in the first place." -- Atrus, Myst: The Book of D'ni.