#!/usr/bin/perl
use Person;
use strict;
use warnings;
use Employee;

my $dirToBePassed = "/path/Dir";

my $object = new Person( "Thanos", "Test", 123456);
my $firstName = $object->getFirstName();
print "This is the first name: $firstName\n";

my $secondObject = new Employee( "refToBeUsed" );
my $solution = $secondObject->somethingCalledFromMain();
print "This is the solution : $solution\n";