Каково популярное, современное использование для Perl?

В качестве связующего языка, языка системных администраторов, и теперь он снова вернулся к использованию Интернета с использованием Catalyst .

В моем университете Perl широко используется для биоинформатических задач. Автоматическое изменение формата файла Proteindata, проверка с помощью базы данных, преобразование результатов обратно и так далее. Так что в основном меняются форматы файлов, регулярные выражения и анализ огромных наборов данных

Как всегда: сделать невозможное возможным. ; -)

Немного запутал вопрос. Для кодирования.

Я думаю, лучше было бы сформулировать это так: Для чего не используется Perl? На что я бы ответил: Написание драйверов устройств, у кого-нибудь есть еще?

Он используется для приложений с графическим интерфейсом (см. Padre), Интернет-приложений (Catalyst), других сетей / сокетов (POE), доступа к базам данных (DBI), криптологии (Пространство имен Crypt), веб-службы (SOAP), обработка двоичных форматов (упаковка / распаковка) ...

И, конечно же, все виды обработки текста.

И это как раз то, для чего я его использовал .. недавно.

Along with Python, the system administrators in my company love it for driving automation tasks. "If something is worth doing, it's worth automating" seems to be a mantra, and if they can do it in five lines, all the better.

Проблема с этим вопросом в том, что Perl - очень универсальный язык. Помимо кода golf и его сходства с awk / sed, он до сих пор широко используется в качестве связующего языка и языка быстрого перехода для задач системного администратора.

С CPAN , много очень полезных и более сложных вещей можно писать быстро.

Он хорошо взаимодействует с базами данных, и существует множество фреймворков для веб-дизайна. Он довольно хорошо работает с Ajax, как я заметил по собственному опыту.

Ознакомьтесь с передовыми методами, и вы получите систему, которая достаточно хороша для выполнения очень больших задач программирования. Черт возьми, весь cpan является свидетельством возможности повторного использования и инкапсуляции Perl.

См. Навыки, которые требуются работодателям, на http://jobs.perl.org/ .

Amazon и IMDB используют Perl, а точнее Mason, IIANM.

В настоящее время я использую Perl для написания пакета автоматизированного тестирования для веб-сайтов моей компании (с использованием WWW :: Mechanize и WWW: : Селен ). Один из моих коллег делает то же самое для других типов серверов. Мы также используем его для нашей программы мониторинга ( Nagios ). И я ежедневно использую perl в качестве инструмента командной строки для помощи в основных задачах системного администрирования.

Попробуйте запустить это с размером терминала как минимум 120x50, и вы будете просветлены;).

                                                   #
                                               sub j(\$){($
                 P,$V)=                      @_;while($$P=~s:^
             ([()])::x){                    $V+=('('eq$1)?-32:31
       }$V+=ord(  substr(                 $$P,0,1,""))-74} sub a{
      my($I,$K,$  J,$L)=@_               ;$I=int($I*$M/$Z);$K=int(
     $K*$M/$Z);$J=int($J*$M             /$Z);$L=int($L*$M/$Z); $G=$
     J-$I;$F=$L-$K;$E=(abs($          G)>=abs($F))?$G:$F;($E<0) and($
      I,$K)=($J,$L);$E||=.01       ;for($i=0;$i<=abs$E;$i++ ){ $D->{$K
              +int($i*$F/$E)      }->{$I+int($i*$G/$E)}=1}}sub p{$D={};$
             Z=$z||.01;map{    $H=$_;$I=$N=j$H;$K=$O=j$H;while($H){$q=ord
            substr($H,0,1,"" );if(42==$q){$J=j$H;$L=j$H}else{$q-=43;$L =$q
          %9;$J=($q-$L)/9;$L=$q-9*$J-4;$J-=4}$J+=$I;$L+=$K;a($I,$K,$J,$ L);
          ($I,$K)=($J,$L)}a($I,$K,$N,$O)}@_;my$T;map{$y=$_;map{ $T.=$D->{$y}
          ->{$_}?$\:' '}(-59..59);$T.="\n"}(-23..23);print"\e[H$T"}$w= eval{
          require Win32::Console::ANSI};$b=$w?'1;7;':"";($j,$u,$s,$t,$a,$n,$o
          ,$h,$c,$k,$p,$e,$r,$l,$C)=split/}/,'Tw*JSK8IAg*PJ[*J@wR}*JR]*QJ[*J'.
           'BA*JQK8I*JC}KUz]BAIJT]*QJ[R?-R[e]\RI'.'}Tn*JQ]wRAI*JDnR8QAU}wT8KT'.
           ']n*JEI*EJR*QJ]*JR*DJ@IQ[}*JSe*JD[n]*JPe*'.'JBI/KI}T8@?PcdnfgVCBRcP'.
            '?ABKV]]}*JWe*JD[n]*JPe*JC?8B*JE};Vq*OJQ/IP['.'wQ}*JWeOe{n*EERk8;'.
              'J*JC}/U*OJd[OI@*BJ*JXn*J>w]U}CWq*OJc8KJ?O[e]U/T*QJP?}*JSe*JCnTe'.
               'QIAKJR}*JV]wRAI*J?}T]*RJcJI[\]3;U]Uq*PM[wV]W]WCT*DM*SJ'.  'ZP[Z'.
                  'PZa[\]UKVgogK9K*QJ[\]n[RI@*EH@IddR[Q[]T]T]T3o[dk*JE'.  '[Z\U'.
                    '{T]*JPKTKK]*OJ[QIO[PIQIO[[gUKU\k*JE+J+J5R5AI*EJ00'.  'BCB*'.
                         'DMKKJIR[Q+*EJ0*EK';sub h{$\ = qw(% & @ x)[int    rand
                          4];map{printf  "\e[$b;%dm",int(rand 6)+101-60*   ($w
                           ||0);system(  "cls")if$w ;($A,$S)=    ($_[1],   $
                            _[0]);($M,   @,)= split  '}';for(     $z=256
                            ;$z>0; $z   -=$S){$S*=   $A;p @,}      sleep$_
                            [2];while   ($_[3]&&($    z+=$ S)       <=256){
                            p@,}}("".   "32}7D$j"     ."}AG".       "$u}OG"
                            ."$s}WG"    ."$t",""      ."24}("        ."IJ$a"
                            ."}1G$n"    ."}CO$o"     ."}GG$t"        ."}QC"
                             ."$h}"      ."^G$e"    ."})IG"          ."$r",
                             "32}?"       ."H$p}FG$e}QG$r".          "}ZC"
                             ."$l",          "28}(LC" .""            ."".
                             "$h}:"           ."J$a}EG".             "$c"
                             ."}M"             ."C$k}ZG".            "$e"
                             ."}"             ."dG$r","18"          ."}("
                            ."D;"            ."$C"  )}{h(16         ,1,1,0
                           );h(8,          .98,0,0   );h(16         ,1,1,1)
                           ;h(8.0         ,0.98,0,     1);         redo}###
                         #written                                 060204 by
                       #liverpole                                  @@@@@@@
                    #@@@@@@@@@@@

Web sites, data processing/extraction, system administration, task automation, even GUI programming. Mathematics, bioinformatics, chemistry, geology programs.

Вы можете немного узнать о том, что люди в настоящее время делают с Perl, просмотрев сообщения, отправленные на Enlighted Perl Iron Man Challenge .

Лично я в настоящее время использую его для создания сайта (еще одного) стартапа социальных сетей с поддержкой AJAX, Twitterfied и т. Д.

В моей компании мы использовали Perl для запуска сотен RegEx для преобразования случайных файлов издателя в SGML для создания электронных книг. Увы, те дни, когда мы обновили наши системы до XML-книг, прошли.

Недавно я написал короткий простой сценарий для анализа некоторых данных из файла журнала. Я считаю его довольно простым и полезным для быстрых задач по написанию сценариев.

Я использую Perl для того, чем он был разработан: P практический способ для E извлечения полезной информации из необработанных данных и представления их в удобочитаемых R эпортах. Это очень хороший L язык для этой задачи.