use FindBin ($Bin); require qq{$Bin/relative/../path/to/loadCSV.pl}; my $out = your::modulino->run( (qw/-L -Q/) ); print $out;