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

my $object = new Mypackage(100);
print $object->getValue() . "\n";
$object->setValue(200);
print $object->getValue() . "\n";

__END__

$ perl main.pl
100
200