7

Perl の現在の一般的な用途は何ですか?

編集

もっと具体的に言うべきでした。個人レベルでのPerl の使用目的よりも、大規模な (一般的な) 何のために Perl を使用しているかについて、私は疑問に思っていました

4

14 に答える 14

14

接着言語、システム管理者の言語として、そして今、それはCatalystを使用したインターネットの乗っ取りに戻っています。

于 2009-06-09T03:47:34.697 に答える
13

私の大学では、バイオインフォマティクスのタスクに Perl が広く使用されています。Proteindata ファイルのフォーマットの自動変更、データベースによるチェック、結果の変換など。そのため、ファイル形式、正規表現、および巨大なデータセットの解析が主に変更されています。

于 2009-06-09T04:55:01.533 に答える
10

これまでと同じ:不可能を可能にする。;-)

于 2009-06-09T03:48:09.580 に答える
8

私の会社のシステム管理者は、自動化タスクを推進するために Python を気に入っています。「何かをする価値があるなら、自動化する価値がある」というのがマントラのようで、5 行でそれを実行できればなおさらです。

于 2009-06-09T03:48:15.180 に答える
8

この質問の問題点は、Perl が非常に用途の広い言語であることです。コード ゴルフと awk/sed との類似点の間で、システム管理タスクのグルー言語および迅速な頼りになる言語として今でも広く使用されています。

CPANを使用すると、多くの非常に便利で高度なものをすばやく作成できます。

データベースとうまく連携し、Web デザイン用のフレームワークがたくさんあります。私自身の使用を通して気づいたように、それは Ajax で非常にうまく機能します。

ベスト プラクティスに取り掛かると、非常に大規模なプログラミング タスクを実行するのに非常に優れたシステムを手に入れることができます。cpan 全体が Perl の再利用性とカプセル化の証です。

http://jobs.perl.org/で、雇用主が求めているスキルを参照してください。

于 2009-06-09T03:51:14.760 に答える
7

質問にやや混乱。コーディング用。

Perl は何に使われていないのですか? 私は次のように答えます: デバイス ドライバを書いています。

これは、GUI アプリ (Padre を参照)、インターネット アプリ (Catalyst)、その他のネットワーク/ソケット (POE)、データベースへのアクセス (DBI)、暗号学 (Crypt 名前空間)、Web サービス (SOAP)、バイナリ形式の処理 (パック/アンパック) に使用されます。 ...

そしてもちろん、あらゆる種類のテキスト処理。

そして、それは私がそれを使用したものです..最近。

于 2009-06-09T19:51:52.040 に答える
6

Amazon と IMDB は Perl、具体的には Mason、IIANM を使用しています。

于 2009-06-09T11:55:47.050 に答える
5

現在、Perl を使用して会社の Web サイト用の自動テスト スイートを作成しています (WWW::Mechanizeとを使用WWW::Selenium)。私の同僚の 1 人は、他の種類のサーバーについても同じことをしています。また、監視ソフトウェア ( Nagios ) にも使用しています。またperl、基本的なシステム管理タスクを支援するコマンドライン ツールとして毎日使用しています。

于 2009-06-09T16:47:51.883 に答える
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)=@_               ;$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                                  @@@@@@@
                    #@@@@@@@@@@@
于 2009-06-09T12:04:15.270 に答える
4

Enlightened Perl Iron Man Challengeに投稿された投稿を見ると、人々が現在 Perl で何をしているかについてかなり知ることができます。

個人的には、現在これを使用して、(さらに別の) AJAX 対応の Twitterfied などのソーシャル ネットワーキング スタートアップのサイトを構築しています。

于 2009-06-09T12:11:57.750 に答える
4

Web サイト、データ処理/抽出、システム管理、タスクの自動化、さらには GUI プログラミング。数学、バイオインフォマティクス、化学、地質学プログラム。

于 2009-06-09T16:22:05.720 に答える
4

最近、ログ ファイルから一部のデータを解析するための短くて単純なスクリプトを作成しました。迅速なスクリプト作成タスクには非常に簡単で便利だと思います。

于 2009-06-09T03:46:32.123 に答える
2

私の会社では、Perl を使用して何百もの正規表現を実行し、ランダムな出版社のファイルを SGML に変換して電子書籍を作成していました。残念ながら、システムを XML ブックに更新した今、そのような時代は終わりました。

于 2009-06-09T05:06:45.077 に答える
0

私は Perl を設計目的で使用しています:データから有用な情報を抽出し、人間が読めるレポートでそれらを提示するための実用的方法です。これは、このタスクにとって非常に優れた言語です。

于 2009-11-05T12:46:09.103 に答える