use Cwd 'abs_path';
my $path = abs_path($file);
[download]

(Update: though, reading the other replies, I may have misunderstood the question...)