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


in reply to Golf for unique digits

perl -E'$y=2013;$y=~/$_/&&$c++for 0..9;say$c'
Update: and -> &&. Thanks space_monk.
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Replies are listed 'Best First'.
Re^2: Golf for unique digits
by space_monk (Chaplain) on Jan 09, 2013 at 11:39 UTC

    Can you save a character by using && instead of and?

    A Monk aims to give answers to those who have none, and to learn from those who know more.

      perl -E'$y=2013;$c+=$y=~$_ for 0..9;say$c' perl -E'$y=2013;say~~map$y=~$_,0..9'

      Yup, just answered my own question and got a birdie
      perl -E '$y=2013;$y=~/$_/&&$c++for 0..9;say$c'
      A Monk aims to give answers to those who have none, and to learn from those who know more.