Select Code to Download

package Package;
use Class::Std;
...
            . 's';
    }
}

use Package::Branch;

...
print "'$obj->get_trunk'\n";
print "'$obj->get_branch'\n";
print "'$obj->get_trees'\n";

my $obj = Package->new( {
    trunk => 'trunk',
    branch => 'branch'
} );

my $obj;
$obj = Package->new( {
...
    trunk => 'trunk',
    branch => 'branch'
} );