Come for the quick hacks, stay for the epiphanies. | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
Here was my final submission, from a beginner ... 71
map{$t+=(ord()-(/\d/?48:55))*36**$l++}reverse split//,shift;print"$t\n" If I took out the final ;print"$t\n", that would take it down to 59. Cool to use pop vs. shift ... shave off 2 more strokes. I'll have to remember that for the next round. :) Jason In reply to Re: The Perl Review
by Purdy
|
|