Question

I have a perl script which is using relative file paths.

The relative paths seem to be relative to the location that the script is executed from rather than the location of the perl script. How do I make my relative paths relative to the location of the script?

For instance I have a directory structure

dataFileToRead.txt
->bin
  myPerlScript.pl
->output

inside the perl script I open dataFileToRead.txt using the code
my $rawDataName = “../dataFileToRead.txt”;
open INPUT, “<“, $rawDataName;

If I run the perl script from the bin directory then it works fine

If I run it from the parent directory then it can’t open the data file.

Answer 1

FindBin is the classic solution to your problem. If you write

use FindBin;

then the scalar $FindBin::Bin is the absolute path to the location of your Perl script. You can chdir there before you open the data file, or just use it in the path to the file you want to open

my $rawDataName = "$FindBin::Bin/../dataFileToRead.txt";
open my $in, "<", $rawDataName;

(By the way, it is always better to use lexical file handles on anything but a very old perl.)