#!/usr/bin/perl
use strict;
use warnings;
use Foo;

my $object = Foo->new();
print $object->method();