#!/usr/bin/perl
my $pathtolib;
BEGIN { $pathtolib = &opentextfile; } # opentextfile must be defined before this line
use lib $pathtolib;

##</code><code>##

#!/usr/bin/perl
# define opentextfile somehow
use lib &opentextfile;