Select Code to Download

 for (1..5){marine()};

...
    print "Hello, sailor number $n!\n";
  }
}

use 5.010;

...
    $n += 1;
    print "Hello, sailor number $n!\n";
  }