Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
"my $s = '86f,934e,92,102i,14,19,222,';
...
 print $sum;
"
1469
  2. or download this
    >perl -wMstrict -le
"use List::Util qw(sum);
...
 print $sum;
"
1469