Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;

...
sub win {
    print "Winning!\n";
}
  2. or download this
    #!/usr/bin/perl -w
use strict;

...

fight;
win;
  3. or download this
    #!/usr/bin/perl -w
use strict;

...
sub win {
    print "Winning!\n";
}