Re: Code Golf: Four is magic

144 chars:
@u=split//,'4335443554366887798866555766';$_=<>;chop;print"$_ is ".($_=$_-4?$_<20?$u[$_]:$u[$_/10+18]+($_%10&&$u[$_%10]):0or magic).".\n"while$_

Demize

Comment on Re: Code Golf: Four is magic Download Code

Replies are listed 'Best First'.
Re^2: Code Golf: Four is magic by deMize (Monk) on Jul 14, 2010 at 05:00 UTC
125 chars: `@u='4335443554366887798866555766'=~/./g;$_=pop;print"$_ is ",$_=$_-4?$_<20?$u[$_]:$u[$_/10+18]+$u[$_%10]:magic,".\n"until/\D/` Demize	[reply] [d/l]
Re^3: Code Golf: Four is magic by thundergnat (Deacon) on Jul 15, 2010 at 03:53 UTC
That is broken for 30, 40, 50, etc.	[reply]


No such thing as a small change
	PerlMonks