Help for this page

Select Code to Download


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

...
diff ("ABBABAA", "BAABABAA");

done_testing;
  2. or download this
    $ test.pl
ok 1 - 'ABBABAA' ~~~ 'BAABABA'
...
ok 5 - 'ABBABAA' ~!~ 'BAABABA '
ok 6 - 'ABBABAA' ~!~ 'BAABABAA'
1..6
  3. or download this
    use 5.026001;
use warnings;
...
diff ("ABBABAA", "BAABABAA");

done_testing;