Perl/Win32

윈도우에서 파일명에 시스템 로케일로 표시할 수 없는 문자가 들어가 있을 경우, glob() 등으로 뽑은 목록을 보면 파일명이 8.3형식으로 나온다. 이걸 가지고 긴 파일명을 얻어내려면 다음과 같이 함

    my $long_name = Win32::GetLongPathName($short_name);

이건 별개의 이야기인데, 윈도우의 파일명에 사용할 수 없는 문자들: (매번 까먹어서 탐색기에서 시도해보느라...)

    $filename =~ s'[\\/:*?"<>|]''g;   # \ / : * ? " < > |