#tempo2.pl
use strict;
use MyPack;
my $myString = $MyPack::aa;
print $myString;