You could use Cwd, File::Basename and File::Spec to find the current directory and perform a number of file path operations in an OS independant manner.