use strict;
use warnings;

use Foo;
my $foo = bless [], 'Foo';
$foo->public( 'Howdy!' );
{ package Foo; $foo->terfuge( 'Hey wassup!' ); }

__END__
From Foo=ARRAY(0x816cc20): Howdy!
DON'T YOU BE CALLIN' THIS HERE METHOD, DANG IT!!!