#!/usr/bin/perl -w
use strict;
use Carp qw/FatalsToBrowser/;

my $obj = MyPackage->new();
my $argument = "Here is a scalar.";

print $argument,"\n";
my $result = $obj->method($argument);
print "My argument still is: $argument. \n";
print "My \$result is now $result.\n";

1;