script_to_change_the_world.pl

#!/usr/bin/perl

use MyParent;
use MyParent::MyChild;
use strict;

my $parentobject = MyParent->new();

$parentobject->method1;
#prints: Foo

#Now I want to access something or other in the MyChild, doing it this way (which is what inheritance means to me)

$parentobject->child_method_a;
#Prints: Foo