#!/home/myhomedrive/opt/perl/bin/perl

use strict;
use warnings;

my $PROGRAM_NAME = "Test";

# The following line reads the entire myModule.pl file and executes it using eval():
@ARGV = "myModule.pl"; eval(join('',<>));

my $string = "  ll ";
$string = trim( $string );

print "\n|$string|\n";

print "\n", value_of_pi();