Help for this page
#!/usr/bin/perl use strict; ... $test->doPrint(); $one->doPrint(); $two->doPrint();
Test: Top set var1 Extend1 overrides doPrint: Top set var1 Test: Top::Extend2 set var1