#!/c:/perl/bin/perl
use lib q(.);
use Foo;
print "Hello!\n";