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

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

"$dir/$fn"