|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : HB 2:5020/400 08 Jul 2001 18:16:09 To : All Subject : Re: чтения списка файлов -------------------------------------------------------------------------------- George wrote in <994532612@p666.f855.n5030.z2.ftn>... > Или, посмотpим на вопpос с дpугой стоpоны: как получить список > файлов каталога так, что бы они были читаемы (их можно откpыть > на чтение)? Вопpос о пpавах доступа не стоит. Что-то я не пойму, из-за чего вся эта длинная дискуссия. $ dir /b $ perl -we "`touch $_` for qw(Съешь ещё этих поганых хранцузских булок)" $ dir /b Съешь ещё этих поганых хранцузских булок $ perl -we "for (<*>) {open(F, $_) || die; print qq(`$_' opened!\n); close(F) }" `с?ыюъ' opened! `хщё' opened! `яюурэы?' opened! `?Ёрэ??чёъш?' opened! `Съхш?' opened! `??ш?' opened! $ perl -we "for (<*>) {open(F, $_) || die; print qq(`$_' opened!\n); close(F) }" | win2dos `булок' opened! `ещё' opened! `поганых' opened! `хранцузских' opened! `Съешь' opened! `этих' opened! Так в чем, все-таки, проблема, кто мешает открыть файлы хоть с белорусскими, хоть с горячими эстонскими именами? -- HB mailto:npecca@yahoo.com?subject=Usenet --- ifmail v.2.15dev5 * Origin: VoronezhSvyazInform ISP (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/63076cd79035.html, оценка из 5, голосов 10
|