Perl: получить путь к файлу в директории

Question

открыть каталог a/b/c/

c имеет d1 , d2, d3 d4

Я хочу напечатать путь d1 d2 d3 d4

как

a/b/c/d1 
a/b/c/d2 
a/b/c/d3 and soo on 

Answer 1

Вы можете попробовать Cwd

perl -e 'use Cwd 'abs_path'; print abs_path("myfile");' 

Answer 2

use Cwd 'abs_path'; 

print "$_\n" for map abs_path($_), glob("a/b/c/*"); 

Answer 3

Если вы не хотите, чтобы канонизировать путь для prettyness (в этом случае вы хотите File::Spec->canonpath и не Cwd::abs_path), вы можете просто использовать

"$dir/$fn"