Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl -l

...
B message B1
A more complex message A1
B message B2
  2. or download this
    package Decoupled;

...
}

1;
  3. or download this
    Do TypeB stuff with 'message B1'
Do TypeA stuff with 'message A1'
Do TypeB stuff with 'message B2'