use strict;
use warnings;
use NoTableName;

my $obj = NoTableName->new(name => 'Bob');
printf "My name is %s\n", $obj->name;