Help for this page

Select Code to Download


  1. or download this
    perl -nle'BEGIN { $prod = 1; } $prod *= $_; END { print $prod; }'
    
  2. or download this
    perl -le'$prod = 1; $prod *= $_ while <>; print $prod;'