Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
use Tester;

Tester::main();
  2. or download this
    #!/usr/bin/perl

...
}

1;
  3. or download this
    #!/usr/bin/perl
use strict;
...
my $one = Tester->get_one();
Tester->set_one(2); # Try to set this for the next test
Test::More::is( $one, 1, 'One equals to one' );
  4. or download this
    #!/usr/bin/perl
use strict;
...
my $one = Tester->get_one();
Tester->set_one(2); # Try to set this for the next test
Test::More::is( $one, 1, 'One equals to one' );