2009-06-09 4 views
7

Каковы популярные, современные приложения для Perl?Что такое популярные, современные приложения для Perl?

Редактировать

Я должен был быть более конкретным. Мне было интересно узнать больше о том, что люди используют Perl, а не то, что он мог бы использоваться на индивидуальном уровне.

+1

это, вероятно, должно быть сообщество wiki – Robert

ответ

4

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

14

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

+2

woot, катализатор, который отлично смотрится! –

+2

Это потому, что это здорово! ;) – Quentin

10

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

8

Наряду с Python системные администраторы в моей компании любят его для автоматизации задач автоматизации. «Если что-то стоит делать, это стоит автоматизировать», кажется, мантра, и если они могут сделать это в пяти строках, тем лучше.

8

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

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

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

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

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

+0

woo, спасибо за изменения: D –

13

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

2

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

6

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

4

Попробуйте использовать это с размером терминала не менее 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)[email protected]_    ;$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[*[email protected]}*JR]*QJ[*J'. 
      'BA*JQK8I*JC}KUz]BAIJT]*QJ[R?-R[e]\RI'.'}Tn*JQ]wRAI*JDnR8QAU}wT8KT'. 
      ']n*JEI*EJR*QJ]*JR*[email protected][}*JSe*JD[n]*JPe*'.'JBI/KI}[email protected]?PcdnfgVCBRcP'. 
      '?ABKV]]}*JWe*JD[n]*JPe*JC?8B*JE};Vq*OJQ/IP['.'wQ}*JWeOe{n*EERk8;'. 
       'J*JC}/U*OJd[[email protected]*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[[email protected]*[email protected][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){ 
          [email protected],}}("". "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         @@@@@@@ 
        #@@@@@@@@@@@ 
+3

Это сценарий использования во все времена для Perl-geek art :-) –

+3

* cough * http://www.onlamp.com/pub/a/oreilly/perl /Применение/ – ysth

4

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

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

4

Веб-сайты, обработка/извлечение данных, системное администрирование, автоматизация задач и даже графическое программирование. Математика, биоинформатика, химия, геологические программы.

5

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

7

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

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

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

И, конечно, всякая обработка текста.

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

0

Я использую Perl для того, что он был разработан: а P ractical пути E xtracting полезной информации из необработанных данных и представление их в человеческих нечитаемых R ОКЛАДОВ. Это очень приятно. L anguage для этой задачи.

Смежные вопросы