[Kiev-pm] [Moscow.pm] Perltuts.com -- интерактивные Perl уроки

alex puhachev alex.puhachev на gmail.com
Пт Июл 20 04:02:34 PDT 2012


Возможность писать и читать файлы.
Делать что то типа

getDir('/');

sub getDir{

    my($dir, на content,$subdir, на all_files);

    $dir = shift;

    opendir(DIR,$dir);

    @content = grep { !/^\.{1,2}$/} readdir(DIR);

    closedir(DIR);

    foreach $subdir (@content){

            if($subdir =~ /^\w+$/){

                @all_files = $dir;

                getDir("$dir/$subdir");

            }else{

                print "$dir/$subdir";

            }

            print ("\n");

    }

}

Может всетаки ограничить только возможностями которые нужны для
выполнения урока?



2012/7/20 vti <viacheslav.t на gmail.com>

> А что смущает?
>
> On 07/20/2012 01:56 PM, alex puhachev wrote:
> > А не много ли возможностей дает это обучалка?
> >
> >
> > 2012/7/20 Oleg Alistratov <ali на ali.org.ua>
> >
> >> Привет!
> >>
> >> Много спасибо.
> >>
> >> Замечание одно. Слишком подробный вывод в TAP позволяет мухлевать.
> >> Например, http://perltuts.com/tutorials/quick-start/strings
> >>
> >> Запускаем:
> >>   not ok 1 - Should be at pos 4
> >>
> >> Пишем
> >>   say 4
> >>
> >> Все в порядке, index() не нужен )
> >>
> >>
> >>
> >> 19.07.2012, 19:22, "vti" <viacheslav.t на gmail.com>:
> >>> Друзья!
> >>>
> >>> Разрешите представить вам Perltuts.com, интерактивные Perl-уроки (ну
> >>> ладно, там пока один только и то неполный).
> >>>
> >>> Буду благодарен за отзывы :)
> >>>
> >>> Спасибо!
>
>
> _______________________________________________
> Kiev-pm mailing list
> Kiev-pm на pm.org
> http://mail.pm.org/mailman/listinfo/kiev-pm
>
----------- следущая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/kiev-pm/attachments/20120720/9fd15c2b/attachment-0001.html>


Подробная информация о списке рассылки Kiev-pm