Perl 6ã®åç§°ãæ£å¼ã«ãRakuãã¸å¤æ´ããã¨ããGitHubã§ã®ææ¡ã«å¯¾ããPerlçã¿ã®è¦ªã®Larry Wall(TimToady)æ°ãæ¯æã表æãã¦ãã(Larry Wallæ°ã®ã³ã¡ã³ãã blogs.perl.orgã®è¨äºã The Registerã®è¨äº)ã æ¬¡ä¸ä»£Perlã¨ãã¦éçºããã¦ããPerl 6ã ããæ£å¼ãªãªã¼ã¹å¾ãPerl 5ã®éçºãé²ãããã¦ããããPerlãã¨ãã£ãå ´åã«Perl 5ãæãç¶æ ãç¶ãã¦ããããã®ãããPerl 6ã®ååã«ãPerlããå ¥ã£ã¦ããã®ã¯ãããã«ããã¨ãã¦ã8æããGitHubã§åç§°å¤æ´ãè°è«ããã¦ããããã®ã¹ã¬ããã§ã¯ãRaku (楽)ãã¨ããæ¥æ¬èªã«ã¤ãã¦ãåéããå«ãã¦ã¡ãã£ã¨é¢ç½ãè°è«ã«ãªã£ã¦ããã ãã¨ãã¨ãRakuãã¨ããååã¯æ¨å¹´ãPerl 6ã®ã¨ã¤ãªã¢ã¹ã¨ãã¦ä½¿ããããä¸ã¤ã®ååãä»ãã¦ã»ããã¨ããZoffix Zne
空ãã¨ã¶ã¨ãããã¨ã¯æå²ä»¥æ¥ã®äººé¡ã®å¤¢ã§ãããããããå®ç¾ããã«ã¯ç¸å¿ã®å°é£ãå¾ ã¡æ§ãã¦ããã ãã®ä¸ã§ã¯ã¢ããã³ãã¿ã¼(4æã®ãããã©ãæã£ãå転翼æ©)ã¨ããã¸ã£ã³ã«ã¯åç´ãªæ©æ§ã§ãããªãããã»ã³ãµã¼ã¨ãã£ã¼ãããã¯å¶å¾¡ã®åã§æ¬æ¥èªç©ºåå¦çã«ä¸å®å®ã§ããã¯ãã®å½¢ç¶ãå¶å¾¡ãããã¨ã«æåããå½¢æ ã§ããã æ¨å¹´ã®ãã¼ã¯ã§ã¯ãæ§ã ãªIoTåãããããç´¹ä»ãã¤ã¤çµã¿åããã¦ãã®ãä½ãæ¹æ³ãææ¡ããããä»åã®ãã¼ã¯ã§ã¯æ¢æåãå©ç¨ã㦠å¤ããèªåå¶å¾¡ãã å é¨ãè§£æãã¦ä¹ã£åã å¤éª¨æ ¼ã¨ãã¼ãã ãå©ç¨ãã¦ä¸èº«ã¯åãæ¿ãã ããã¼ãã«Perlã§ããã¼ã³(=èªç«é£è¡ããèªç©ºæ©)ãä½ãã®ãç®æãã ãã®ãã¼ã¯ã§ä¼ãããã㨠ã¯ã¢ããã³ãã¿ã¼ã¨ããã¸ã£ã³ã«ã®é¢ç½ã Perlã«ã徿ä¸å¾æããããä¸å¾æãããã«è£ãã 対象è ã©ããã¦ãPerlã§ããã¼ã³ãé£ã°ããã人 Perlãããªãã¦ãããããã©ããã¼ã³ã
ä¸è¦Emailã¢ãã¬ã¹ã«ãããããæ£è¦è¡¨ç¾ãçµã¿ç«ã¦ãã®ã¯ç°¡åããã«æãã¾ãããRFC 5322ã«å³å¯ã«æºæ ããæ£è¦è¡¨ç¾ãåµãã ããã¨ããã¨ã¨ãã§ãç¡ãåªåãå¿ è¦ã¨ãªãããã§ãã ãEmail Address Regular Expression That 99.9% Worksãã¯ãæ§ã ãªããã°ã©ãã³ã°è¨èªãã¨ã«ãEmailã¢ãã¬ã¹ã«99%ãããããæ£è¦è¡¨ç¾ãæ²è¼ãããµã¤ãã§ãä¾ãã°Perl 5.10ããåã®ãã¼ã¸ã§ã³ã®Perlç¨ã¨ãã¦ãæ²è¼ããã¦ããé·å¤§ãªæ£è¦è¡¨ç¾ãè¦ãã°ããã®é£æåº¦ã®é«ãã確èªãããã¨ãã§ãã¾ãã æ£è¦è¡¨ç¾ã«ã¯ãªãã®è§£èª¬ããªãã©ã®ãããªæå³ããã£ã¦ä½ãããã®ã説æã¯ããã¾ãã(ãã£ã¦99%ããããããã©ããã¯æ¬å½ã®ã¨ããã¯ä¸æ)ãã¡ãªã¿ã«æ¥æ¬èªã§èªããè²´éãªæ å ±ãPerlã¡ã¢ãã§ã¯ããperl5.6.0以åã® perl ã§ã¯ã¡ã¼ã«ã¢ãã¬ã¹ã®æ£è¦è¡¨ç¾ãæ£ç¢ºã«è¨è¿°ãããã¨
ãµã¼ãã¹çµäºã®ãç¥ãã ãã¤ãYahoo! JAPANã®ãµã¼ãã¹ããå©ç¨ããã ãèª ã«ãããã¨ããããã¾ãã ã客æ§ãã¢ã¯ã»ã¹ããããµã¼ãã¹ã¯æ¬æ¥ã¾ã§ã«ãµã¼ãã¹ãçµäºãããã¾ããã ä»å¾ã¨ãYahoo! JAPANã®ãµã¼ãã¹ããæé¡§ãã ããã¾ãããããããããé¡ããããã¾ãã
æã¯PHPã¯åä½ãéãã¨ããçç±ã§Perlãéå®ãããã¦ãã¾ããããç¾å¨ã§ã¯ãããªãã¡ãªããããã表示é¨ã¨ããã°ã©ã é¨ãã¾ã¨ãã¦æ¸ãã管çã®ãããããçç±ã¨ãªã£ã¦PHPã®æ¹ã人æ°ã§ããã Perlã¯HTML表示é¨ã¨POSTåãä»ãé¨åãåé¢ãã¦ããã®ã§ç®¡çãé¢åã§ãããã ãã¨ãã»ãã·ã§ã³ã£ã¦ãã便å©ãªæ©è½ãããã¾ããããå¤ãè¨èªã¯ããããã¨éçºè ãé¢åã§ããã
æ£è¦è¡¨ç¾ã§ã¯ç¹å¥ãªæå³ãæã¤æåãããã¤ãããããã®ã¾ã¾è¨è¿°ããã¨æå³ã®ããæå®ã¨è§£éããã¾ãã ãããã®æåããéå¸¸ã®æååã¨ãã¦èªèãããå ´åã¯ãã¨ã¹ã±ã¼ããã¦ãã ããã ï¼ã¨ã¹ã±ã¼ãã¨ã¯ã\ ãã¼ã¯ãã¤ãã¦ç¹æ®åä½ãç¡å¹ã«ããããã¨ãï¼
ãã®è¨äºã¯âã«ç§»è»¢ãã¾ããã laysakura.github.io
ãããããããã° Perl æ å ±éã«ãªãããã¨ãããµã¤ãä¸è¦§ Perl é¢é£ã®æ å ±ããã¤ããã«ã¯ãåã¯ä»¥ä¸ã®ãµã¤ããã¿ã¦ãã¾ã å人ããã° TATSUHIKO MIYAGAWA'S BLOG http://weblog.bulknews.net/ ææ°ã® miyagawa æ å ±ããããã¾ãã Charsbar::Note http://d.hatena.ne.jp/charsbar/ ææ°ã® DBD::SQLite æ å ±ãªã©ããããã¾ãã Hateburo: kazeburo hatenablog http://kazeburo.hatenablog.com/ kazeburo ããã®ãµãããã°ã£ã½ããã¤ãnomadscafe.jp ã®æ¹ã¨ä½¿ããããããããããªãã ãã¨ãã¯ã¦ã¶ããã§æ¤ç´¢ãã¦ãã¿ã¤ãããªãã ãã¾ã¨ãæ å ± FrePAN http://frepan.64p.org/ æåå³
Perl ⺠æ°å¤ ⺠here æååãæ´æ°ã表ç¾ãã¦ããããå¤å®ããã«ã¯ãæ£è¦è¡¨ç¾ãå©ç¨ãã¾ããæ£è¦è¡¨ç¾ã§æåããçµããã¾ã§æ°åã§ã§ãã¦ãããã©ãããå¤å®ãã¾ãã /^[0-9]+$/ æ´æ°ã§ãããã©ãããå¤å®ããã«ã¯ä¸è¨ã®æ£è¦è¡¨ç¾ã«ãå é ã«+ã-ãæå®ããã¦ããã¾ããªãã¨ãããã¨ãä»ãå ããã ãã§ãã /^[+-]?[0-9]+$/ ãµã³ãã« å¤æ°ãæ°å¤ãã©ãããå¤å®ãããµã³ãã«ã§ãã use strict; use warnings; print "1: æååãæ£ããæ°å¤ã表ç¾ãã¦ããããå¤å®ãã\n"; my $num1 = "345"; # æååãæ°åã®ã¿ã§ãããã©ããã®å¤å® # ãå é ããæ°åãã²ã¨ã¤ä»¥ä¸ç¶ãã¦æ«å°¾ã«ããããã¨èªã if ($num1 =~ /^[0-9]+$/) { print "$num1ã¯æ°åã®ã¿ã®æååã§ãã\n"; } # æ´æ°ã§ãããã©ããã®å¤
2005å¹´ Railsã®è¥²æ¥2005å¹´ã«çªå¦ç¾ããRailsã«ãã£ã¦å½å ã§Rubyå©ç¨è ãæ¥å¢ããã®ãPerlæ» äº¡ã¸ã®ç¬¬ä¸æ©ã¨ãªã£ããæ¸ããããã«ä½è ãã¨ãã¨ããã ãã£ã¦ä½ãããRubyã®é åãä¸åº¦ç¥ã£ã¦ãã¾ãã¨Perlã®å¤ãããèªã¿è¾ãæ¸ãè¾ãææ³ã«èª°ãããããããå§ããã 2007å¹´ JavaScriptãã¼ã Ajaxã§åçºè¦ãããJavaScriptã®ãã¼ã ãPerlçµçã«è¥å¹²ãªããè²¢ç®ãã¦ããããã©ã¦ã¶ã¨ããPerlãå ¨ãæãåºããªãã¸ã£ã³ã«ã®çè JavaScriptã®æã¤è¯ãããã«èª°ããæ§ããããã¦æå ã®Perlã®å¤ãããã«ååãåºå§ãããä¸å¨ç¨ã§ä¸ç´°å·¥ãªã¨ãããå«ãã¦æãã¦ãã女æ¿ã¨ã¤ã¤ã¾ããéã£ã¦ãã人çã«ãçªç¶ã´ã¡ã´ã¡ã®ãã¤ã³å¥³å大çã転ããè¾¼ãã§æ¥ããããªãã®ã§ããã ã¹ãã/ã½ã¼ã·ã£ã«ã²ã¼ã ããã«iPhoneå¸å ´ãæ¬æ ¼çã«ç«ã¡ä¸ãããPerlã¨ã¯å ¨ãã®ç¡é¢ä¿ã§ããã¹ãã
Perlã§ã³ãã³ãã©ã¤ã³ãªãã·ã§ã³ãparseãããã¨æãã¨çµè¾¼ã¿ã¢ã¸ã¥ã¼ã«ã¨ãã¦ã¯ Getopt::Std 㨠Getopt::Long ããããããlong style option *1 ã¤ã¾ã --option-name ã®ãããªãªãã·ã§ã³ãè§£éãã¦ãããã®ã¯ Getopt::Long ã ãã ããªã®ã§æ®éã¯ãã¡ãã使ããã ãã ã 絶対ã«ããã©ã«ããã¤ã¾ã以ä¸ã®ããã«ãã¦ä½¿ã£ã¦ã¯ãããªãã use Getopt::Long; my (@primary, @secondary, $silent); GetOptions( "server-primary|p=s" => \@primary, "server-secondary|s=s" => \@secondary, "silent|S" => \$silent ); ãããã¡ï¼ 絶対ãã¡ï¼ æ»ã¬ï¼ æåã«çµè«ãæ¸ã å¿ ã以ä¸ã®ããã«
hi â»æ¬ãã¼ã¸ã«ã¯ã¢ãã£ãªã¨ã¤ããªã³ã¯ãå«ã¾ãã¦ãã¾ãã
perlã®WWW::Mechanizeã¢ã¸ã¥ã¼ã«ã§ã¤ãã¼ï¼ã¸ã£ãã³ã«ãã°ã¤ã³ãããµã³ãã«ã³ã¼ãã #!/usr/local/bin/perl # Coded by kaworu package K; use strict; use warnings; use WWW::Mechanize; sub yahoo_login { my ($login, $passwd) = @_; my $url = 'https://login.yahoo.co.jp/config/login'; my $mech = WWW::Mechanize->new(); $mech->get($url); if(! $mech->success() ) { return; } if(! $mech->is_html()) { return; } my $r = $mech->submit_form( form_n
ãã¡ã¤ã«æä½ã®æä»å¶å¾¡ã¨ããã°ã以ä¸ã®ãã®ã代表çã§ãã flockã¨ããã¯ãã¡ã¤ã«ï¼ãã£ã¬ã¯ããªï¼å¼ã«å¤§ããåãããã¾ãã ããã¯ãã¡ã¤ã«ï¼ãã£ã¬ã¯ããªï¼ã使ã open颿° symlink颿° mkdir颿° rename颿° å¤ãããã¯ãã¡ã¤ã«ï¼ãã£ã¬ã¯ããªï¼ã®åé¤ ã·ã°ãã«ãã©ãã flockã使ã flock颿° èªè¾¼ã¢ã¼ã 追å ã¢ã¼ã 䏿¸ãã»èªã¿æ¸ãã¢ã¼ã ã¨ã©ã¼å¦ç ã¾ã¨ãã¦ããã¯ãã ã¿ã¤ã ã¢ã¦ã â ããã¯ãã¡ã¤ã«ï¼ãã£ã¬ã¯ããªï¼ã使ã åºæ¬ã¯åãªã使ç¨ä¸ã®ç®å°ã§ããç®å°ãç¡ãã¨ãã«å ¥ã£ã¦ãèªåã§ç®å°ãä½ããæä½ãçµãã£ãã¨ãã«æ¶ãã¦åºãã ãã§ããããã¤ã¬ã¿ãã(^^)ãã§ã使ç¨ä¸ãªãä½åãããã¯ãã¾ããï¼ããããªãï¼ open颿° ãã¡ã¤ã«ãªã¼ãã³é¢æ°ã§ãã¡ã¤ã«ä½æã 1.ãã¡ã¤ã«ãåå¨ãããã 2.ããªããã°ä½æã ã¨ï¼æ®µéãè¦ããã®ã§ããã®éã«ä»ã®ããã»ã¹ã
ã©ã³ãã³ã°
ã©ã³ãã³ã°
ã¡ã³ããã³ã¹
ãªãªã¼ã¹ãé害æ å ±ãªã©ã®ãµã¼ãã¹ã®ãç¥ãã
ææ°ã®äººæ°ã¨ã³ããªã¼ã®é ä¿¡
å¦çãå®è¡ä¸ã§ã
j次ã®ããã¯ãã¼ã¯
kåã®ããã¯ãã¼ã¯
lãã¨ã§èªã
eã³ã¡ã³ãä¸è¦§ãéã
oãã¼ã¸ãéã
{{#tags}}- {{label}}
{{/tags}}