Help for this page

Select Code to Download


  1. or download this
    package MyTst;
use warnings;
use strict;
...
}

1;
  2. or download this
    #!/usr/bin/perl
use warnings;
use strict;
...
sub end {
  print "TstPkgB::end\n";
}
  3. or download this
    TstPkgA::begin
Transaction A!
TstPkgA::end
...
TstPkgB::begin
Transaction B!
TstPkgB::end