Select Code to Download

use strict;
use warnings;

...
if ( $total > 1 ) {
  print "David Pogue was wrong\n";
}