Help for this page

Select Code to Download


  1. or download this
    package A;

sub foo { print "xyzzy\n"; }

1;
  2. or download this
    package B;
use base 'A';

1;
  3. or download this
    package C;
use base 'B';

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

require 'C.pm';

C::foo();