Comment puis-je obtenir le chemin complet de Win32 à partir du chemin DOS 8.3 avec Perl?

Question

Ma question dit essentiellement tout. Je reçois ceci:

C:\DOCUME~1\frew\MYDOCU~1\Code\AIRCRA~1\lib\ACD\VALIDA~1.PM 

et je veux ceci:

C:\Documents and Settings\frew\My Documents\Code\aircraft_ducting\lib\ACD\Validators.pm 

Je regarde File :: Spec :: Win32, mais qui ne semble pas avoir tout ce qui ferait l'affaire.

Des idées?

Merci!

Answer 1

Vous pouvez utiliser Win32::GetLongPathName($path) à partir du module Win32.

Answer 2

Win32::GetLongPathName() est tout ce dont vous avez besoin.