foreach my $path (@paths) { $path = "$pwd/$path"; }