Utilice la función abs_path en Cwd para conocer el camino absoluto de un fichero o directorio:
pp2@nereida:~/src/perl/testing$ perl -wde 0 DB<1> use Cwd 'abs_path' DB<2> x abs_path('add.pl') 0 '/home/pp2/src/perl/testing/add.pl' DB<3> x abs_path('./add.pl') 0 '/home/pp2/src/perl/testing/add.pl' DB<4> x abs_path('/home/pp2/src/perl/testing/add.pl') 0 '/home/pp2/src/perl/testing/add.pl' DB<5> x abs_path('../testing/add.pl') 0 '/home/pp2/src/perl/testing/add.pl' DB<6> x abs_path('../testing/') # También con directorios 0 '/home/pp2/src/perl/testing'
Casiano Rodríguez León