#!/usr/bin/perl

use Person;

$thePresident = new Person("Bill", "Clinton");
print $thePresident ->getName(), "\n";