Help for this page
package Simple; use vars qw ($AUTOLOAD); ... } 1;
package Simple::Child; ... } 1;
#!/usr/bin/perl -w ... print $thingy->get_foo . "\n" . $thingy->get_version . "\n"; $thingy->yip();