Select Code to Download

   my $max1;
   my $max2;
   my $min1;
   my $min2;
   my $i;

my ($max1, $max2, $min1, $min2, $i) = (0,0,0,0,0, );