package Foo;

our $VERSION = '1.0';

use strict;
use warnings;

sub new
{
    my $class = shift();

    my ($arguments) = @_;

    my $self = {};

    bless $self, $class;
}

##</code><code>##

#!/tool/bin/perl -w
use strict;
use lib '/home/user/perl_modules/lib/perl5';
use My::Foo 1.0;

printf("version = %s\n", $Foo::VERSION);