#!/usr/bin/perl
use DerivedClass;

my $object = DerivedClass->new();
print $object->blah() . "\n";