Каковы популярные современные варианты использования Perl?
Изменить
Я должен был быть более конкретным. Мне было интересно больше о том, для чего люди используют Perl в больших (популярных) масштабах, а не о том, для чего его можно использовать на индивидуальном уровне.
В качестве связующего языка, языка системных администраторов, а теперь он вернулся к использованию Интернета с помощью Катализатор.
В моем университете Perl широко используется для биоинформатических задач. Автоматическое изменение формата файла Proteindata, проверка с помощью базы данных, преобразование результатов обратно и так далее. Так что в основном меняются форматы файлов, регулярные выражения и парсинг огромных наборов данных.
Как всегда: сделать невозможное возможным. ;-)
Системным администраторам в моей компании нравится не только Python, но и задача автоматизации. «Если что-то стоит делать, это стоит автоматизировать», - кажется мантрой, и если они могут сделать это в пяти строках, тем лучше.
Проблема с этим вопросом в том, что Perl - очень универсальный язык. Помимо кода golf и его сходства с awk / sed, он по-прежнему широко используется в качестве связующего языка и языка быстрого перехода для задач системного администратора.
С помощью CPAN можно быстро написать множество очень полезных и более сложных вещей.
Он хорошо взаимодействует с базами данных, и существует множество фреймворков для веб-дизайна. Он довольно хорошо работает с Ajax, как я заметил по собственному опыту.
Ознакомьтесь с лучшими практиками, и вы получите систему, которая неплохо справляется с очень большими задачами программирования. Черт возьми, вся cpan является свидетельством возможности повторного использования и инкапсуляции Perl.
Посмотрите навыки, которые востребованы работодателями, на http://jobs.perl.org/.
Несколько смущает вопрос. Для кодирования.
Я думаю, это было бы лучше сформулировать так: для чего не используется Perl? На что я бы ответил: Пишем драйверы устройств, у кого-нибудь есть еще?
Он используется для приложений с графическим интерфейсом (см. Padre), интернет-приложений (Catalyst), других сетей / сокетов (POE), доступа к базам данных (DBI), криптологии (пространство имен Crypt), веб-служб (SOAP), обработки двоичных форматов (упаковка / распаковка) ...
И, конечно же, всевозможная обработка текста.
И это как раз то, для чего я его использовал ... недавно.
Amazon и IMDB используют Perl, а точнее Mason, IIANM.
В настоящее время я использую Perl для написания пакета автоматического тестирования для веб-сайтов моей компании (используя _ 1_ и WWW::Selenium < / а>). Один из моих коллег делает то же самое для других типов серверов. Мы также используем его для нашего программного обеспечения для мониторинга (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 @@@@@@@
#@@@@@@@@@@@
Вы можете немного узнать о том, что люди в настоящее время делают с Perl, просмотрев сообщения, отправленные на Enlighted Perl Вызов Железного человека.
Лично я в настоящее время использую его для создания сайта (еще одного) для стартапа социальных сетей с поддержкой AJAX, Twitterfied и т. Д. И т. Д.
Веб-сайты, обработка / извлечение данных, системное администрирование, автоматизация задач, даже программирование графического интерфейса. Программы по математике, биоинформатике, химии, геологии.
В моей компании мы использовали Perl для запуска сотен RegEx для преобразования случайных файлов издателя в SGML для создания электронных книг. Увы, те дни, когда мы обновили наши системы до XML-книг, прошли.
Я использую Perl для того, что он был разработан: P практический способ для E извлечения полезной информации из необработанных данных и представления их в удобочитаемом формате R эпортс. Это очень хороший L язык для этой задачи.
