Aktywne Wpisy
Mefedronka +133
Chciałam Wam podziękować za to, że uswiadomiliscie mnie, że jestem gruba. Od dawna nie mam w domu lustra ani wagi, więc ciężko (hehe) było mi to stwierdzić. Na szczęście teraz już wiem i mogę coś z tym zrobić. Zacznę od długich spacerów i wyeliminuję z diety białe pieczywo. Nie wiem, co bym bez Was zrobiła, jesteście super!!! Życzę smacznej kawusi i miłego dzionka dla wszystkich Was. #pokazmorde #rozowypasek #chudnijzwykopem
stuparevic +918
Są jacyś #!$%@? perla? Jak najprościej wylistować wszystkie pliki w jakiejś ścieżce rekurencyjnie (tzn. pliki w podścieżkach też) ?
Komentarz usunięty przez autora Wpisu
https://www.google.pl/search?q=perl+list+dir&aq=f&oq=perl+list+dir&aqs=chrome.0.57j0l3j64.5493&sourceid=chrome&ie=UTF-8#hl=pl&tbo=d&sclient=psy-ab&q=perl+list+dir+recursive&oq=perl+list+dir+rec&gs_l=serp.3.0.0i30.1698.2536.0.3884.4.4.0.0.0.0.138.437.2j2.4.0...0.0...1c.1.EB2V-6HTz90&pbx=1&bav=on.2,or.r_gc.r_pw.r_cp.r_qf.&bvm=bv.41642243,d.bGE&fp=da9592422c4b916a&biw=1366&bih=676
znalazłem coś takiego:
use File::Find qw(finddepth);
my @files;
finddepth(sub {
return if($ eq '.' || $ eq '..');
push @files, $File::Find::name;
}, '/my/dir/to/search');
i działa zajebiście, więc koniec tematu