s5r.jps5r.jp About Name shunirr Location Tokyo, Japan Using Services Hatena Blog Scrapbox Twitter Github Contacts Twitter @shunirr Email m at s5r dot jp Game Accounts Steam shunirr PSN shunirr Xbox shunirr Nintendo SW-3097-5307-8703
Perl::Critic / UNIVERSAL::require - naoyaã®ã¯ã¦ãªãƒ€ã‚¤ã‚¢ãƒªãƒ¼
ã“ã®ã¨ã“ã‚社内ã®æŠ€è¡“勉強会ã§å–り上ã’ã¦ã„るテーマ㮠Perl::Critic。ã“ã®ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã¯ã€Damian Conway ã® Perl Best Pracitice ã«æ›¸ã‹ã‚Œã¦ã„るスタンダード㪠Perl ã®ã‚³ãƒ¼ãƒ‡ã‚£ãƒ³ã‚°ã‚¹ã‚¿ã‚¤ãƒ«ã‚’ãƒã‚§ãƒƒã‚¯ã™ã‚‹ãŸã‚ã®ã‚‚ã®ã§ã™ã€‚Perl::Critic をインストールã™ã‚‹ã¨ perlcritic ã¨ã„ã†ã‚³ãƒžãƒ³ãƒ‰ãŒã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã•ã‚Œã€ãれを使ã†ã“ã¨ã§è‡ªåˆ†ãŒæ›¸ã„㟠Perl ã®ã‚½ãƒ¼ã‚¹ã‚’ãƒã‚§ãƒƒã‚¯ã—ãŸã‚Šã§ãã‚‹ã¨ã„ã†ã€‚ ã„ã‚ã‚“ãªã‚³ãƒ¼ãƒ‡ã‚£ãƒ³ã‚°ã‚¹ã‚¿ã‚¤ãƒ«ã®ãƒ«ãƒ¼ãƒ«ã¨ã‹ã¯ã€Perl::Critic::Policy ã®ã‚µãƒ–クラスã«è¨˜è¿°ã•ã‚Œã¦ã„ã¦ã€pod ã§å…¨éƒ¨èªã‚ã¾ã™ã€‚ ã“ã® Perl::Critic ãªãƒãƒªã‚·ãƒ¼ã®ä¸ã« Perl::Critic::Policy::BuiltinFunctions::ProhibitStringyEval ã¨ã„ã†ã®ãŒã‚ã‚Šã¾ã™ã€‚ã“れ㯠eval ã«ã¯æ–‡
Elementary, ... アクセサモジュールベンム- Lvalue速ã£
Perl ã®ã‚¢ã‚¯ã‚»ã‚µãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã¨ã—ã¦ã¯ã€Class::Accessor::Fast ãŒäººæ°—ã™ã。 # ã“ã‚Œã¯ä¾‹ package Hoge; use base 'Class::Accessor::Fast'; __PACKAGE__->mk_accessors(qw( req )); sub new { my $class = shift; bless { url => 'http://e8y.net/', req => HTTP::Request->new, }, $class; } ã“ã‚“ãªé¢¨ãªã€ãƒãƒƒã‚·ãƒ¥ã« bless ã™ã‚‹ã‚ˆãã‚るクラスã®å ´åˆã«ã€ãã®ãƒãƒƒã‚·ãƒ¥ã®ã‚ーã¨åŒã˜åå‰ã§getterを作æˆã—ã¦ãŠãã¨ã€å±žæ€§ã«ã‚¢ã‚¯ã‚»ã‚¹ã™ã‚‹å ´åˆï¼ˆ$hoge->url）ã¨å±žæ€§ã®ã‚ªãƒ–ジェクトã®ãƒ¡ã‚½ãƒƒãƒ‰ã‚’呼ã¶å ´åˆï¼ˆ$hoge->req->header()）ã«ã€ãƒ–レース{} ãŒé€”ä¸ã«å…¥ã£ã¦ã“ãªã„ã®ã§è¦‹ã‚„ã™ã„ã—ã€ã
ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®çµ‚了日を2020å¹´1月31æ—¥(金)ã«æ±ºå®šã—ã¾ã—㟠- ã¯ã¦ãªã®å‘ŠçŸ¥
ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®çµ‚了日を2020å¹´1月31æ—¥(金)ã«æ±ºå®šã—ã¾ã—㟠以下ã®ã‚¨ãƒ³ãƒˆãƒªã®é€šã‚Šã€ä»Šå¹´æœ«ã‚’目処ã«ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—を終了予定ã§ã‚る旨をãŠçŸ¥ã‚‰ã›ã—ã¦ãŠã‚Šã¾ã—ãŸã€‚ 2019年末を目処ã«ã€ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®æ供を終了ã™ã‚‹äºˆå®šã§ã™ - ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—日記 ã“ã®ãŸã³ã€æ£å¼ã«çµ‚了日を決定ã„ãŸã—ã¾ã—ãŸã®ã§ã€ä»¥ä¸‹ã®é€šã‚Šã”確èªãã ã•ã„。 終了日: 2020å¹´1月31æ—¥(金) エクスãƒãƒ¼ãƒˆå¸Œæœ›ç”³è«‹æœŸé™:2020å¹´1月31æ—¥(金) 終了日以é™ã¯ã€ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã®é–²è¦§ãŠã‚ˆã³æŠ•ç¨¿ã¯è¡Œãˆã¾ã›ã‚“。日記ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆãŒå¿…è¦ãªæ–¹ã¯ä»¥ä¸‹ã®è¨˜äº‹ã«ã—ãŸãŒã£ã¦æ‰‹ç¶šãã‚’ã—ã¦ãã ã•ã„。 ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—ã«æŠ•ç¨¿ã•ã‚ŒãŸæ—¥è¨˜ãƒ‡ãƒ¼ã‚¿ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆã«ã¤ã„㦠- ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—日記 ã”利用ã®ã¿ãªã•ã¾ã«ã¯ã”迷惑をãŠã‹ã‘ã„ãŸã—ã¾ã™ãŒã€ã©ã†ãžã‚ˆã‚ã—ããŠé¡˜ã„ã„ãŸã—ã¾ã™ã€‚ 2020-06-25 追記 ã¯ã¦ãªã‚°ãƒ«ãƒ¼ãƒ—日記ã®ã‚¨ã‚¯ã‚¹ãƒãƒ¼ãƒˆãƒ‡ãƒ¼ã‚¿ã¯2020å¹´2月28
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
今日ã®CPANモジュール（跡地） 目次
Redirecting… Click here if you are not redirected.
Apache1.3 PHP4.3 MySQL4.0 MT3.11ja ダイナミックページ
好ããªã‚‚ã®ã¯ç©ºã¨ç·‘ã¨S2000ã¨ã‚¬ãƒ³ãƒ€ãƒ ã¨ãƒ©ã‚¸ã‚³ãƒ³ãƒ»ãƒŸãƒ‹å››é§†ã€Perfume（ã‹ã—ゆã‹ï¼‰ã€‚ã¨ãã©ãå育ã¦ã¨ã‚ャンプ。 MT3.11jaã®ãƒ€ã‚¤ãƒŠãƒŸãƒƒã‚¯ãƒšãƒ¼ã‚¸ã‚’試ãã†ã¨ã—ãŸã‚‚ã®ã®ã€SQLエラーãŒç™ºç”Ÿã—ã¦ä»Šã®ä»Šã¾ã§å‡ºæ¥ã¾ã›ã‚“ã§ã—ãŸã€‚よã†ã‚„ãæˆåŠŸã—ãŸã®ã§ã€ãã®ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ãƒ¡ãƒ¢ã€‚ -OS redhat9 httpdãªã©ã¯ã„ã‚Œãšã€‚gccãªã©é–‹ç™ºãƒ„ールをã„ã‚ŒãŸã®ã¿ã€‚ - apache1.3.3 download apache ./configure --prefix=/usr/local/apache --enable-module=rewrite --enable-module=so --enable-module=proxy - mysql 4.0.22(rpm) download mysql rpm -Uvh MySQL-client-4.0.22-0.i386.rpm MySQL-server-
ã¡ã‡ã£ã★ã½ã„ã‚“ã¨: CPANã®å†è¨å®šã‚’è¡Œã†
åˆæœŸè¨å®šã‚’誤ã£ãŸã‚‰ã—ãã€CPANã®å†è¨å®šã‚’è¡Œã„ãŸã„ãã¦ã—ょã†ãŒãªã„。 ã§ã€è‰²ã€…ã¨èª¿ã¹å›žã£ãŸçµæžœã€ã“ã‚“ãªã‚„ã‚Šæ–¹ãŒã‚ã£ãŸã€‚ cpan> o conf init ã‚〜ã€ã‚ˆã‹ã£ãŸã€‚ 投稿者 kurumania : 05/06/21 トラックãƒãƒƒã‚¯ ã“ã®ã‚¨ãƒ³ãƒˆãƒªãƒ¼ã®ãƒˆãƒ©ãƒƒã‚¯ãƒãƒƒã‚¯URL: http://linux.kurumania.net/cgi-bin/mt-tb.cgi/37 コメント コメントã—ã¦ãã ã•ã„
Perlモジュール/WWW::Mechanize - Walrus, Digit.
以下ã¯ã€ä»–サイトã«æŽ²è¼‰ã•ã‚Œã¦ã„る有用ãªWWW::Mechanize使用例ã§ã™ã€‚ ç§è‡ªèº«ã€ã€ŒAmazon アフィリエイトレãƒãƒ¼ãƒˆã€ã‚’見ã¦ã€æœ¬å½“ã«ã“ã®WWW::Mechanizeを使ãŠã†ã€ã¨æ€ã„ã¾ã—ãŸã€‚ Amazon アフィリエイトレãƒãƒ¼ãƒˆ(blog.bulknews.net)。 WWW::Mechanize を使ã£ã¦ bk1 ã®æ³¨æ–‡å±¥æ´ã‚’å–å¾—ã™ã‚‹ã‚¹ã‚¯ãƒªãƒ—ト(www.asmate.net)。 mixiã®è¶³ã‚ã¨ã‚’å–å¾—ã™ã‚‹ã‚¹ã‚¯ãƒªãƒ—ト(digit.que.ne.jp)。日記を投稿ã™ã‚‹ã‚¹ã‚¯ãƒªãƒ—トã®ã‚¢ãƒ¬ãƒ³ã‚¸ã§ã™ã€‚ 指定ã—ãŸã‚«ãƒ†ã‚´ãƒªã®ã€ä»Šæ—¥ã®ä¸€è¦§ã‚’å–得。 「次ã®ãƒšãƒ¼ã‚¸ã€ã‚‚追ã„ã‹ã‘ã¦å‡¦ç†ã—ã¾ã™ã€‚ use strict; use WWW::Mechanize; my $url = 'http://headlines.yahoo.co.jp/hl'; my $cate_label = 'コンピュータ一覧'; m
solution: cpan not working ... 'Undefined subroutine &Compress::Zlib::gzopen called ..' - id:lopnor
http://d.hatena.ne.jp/urapico/20071110/1194668943 I had the same trouble on another distro -- the solution (for me) was to delete all the Compress::Zlib files (or at least files under my perl installation containing the word "Compress" or "Zlib") and just restart CPAN and install what I needed. That way, a fresh Compress::Zlib (and whatever else I deleted) was downloaded from CPAN and installed. h
解決：Scalar::Util::weakenを使ãŠã†ã¨ã™ã‚‹ã¨Weak references are not implementedã§è½ã¡ã‚‹ - ヒルズã§åƒã@robarioã®æŠ€ãƒã‚°
Scalar::Util::weaken 使ã£ã¦ã‚‹ã‚¹ã‚¯ãƒªãƒ—トãŒå…¨æ»…。 （略） ãªã‚“ã§ã ã‚ーã¨ãŠã‚‚ã£ã¦ã¨ã‚Šã‚ãˆãš Scalar::Util å†ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã—ãŸã‚‰ç›´ã£ãŸã€‚ 謎éŽãŽã‚‹ã€‚。åŒã˜ãƒãƒ¼ã‚¸ãƒ§ãƒ³ã ã£ãŸã®ã«ã€‚ ã†ã¡ã§ã‚‚åŒã˜ç¾è±¡ãŒç™ºç”Ÿã—ã¾ã—ãŸã€‚ $ perl -MScalar::Util=weaken -e 42 Weak references are not implemented in the version of perl at -e line 0 BEGIN failed--compilation aborted. $ perl -MScalar::Util -e 'print Scalar::Util->VERSION' 1.18CLONtypesterã•ã‚“ã¨åŒã˜ãå†ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã—ãŸã‚‰ç›´ã‚Šã¾ã—ãŸã€‚ $ cpan -fi Scalar::Util $ perl -MScalar::Ut
plagger - otsune FreeStyleWiki
Plagger æ³¨æ„ ã“ã®ãƒšãƒ¼ã‚¸ã¯å˜ãªã‚‹ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«æ‰‹é †ã®ãƒ¡ãƒ¢ã§ã™ã€‚Plaggerã¯é–‹ç™ºãŒæ´»ç™ºãªã®ã§ã€ã“ã“ã®æƒ…å ±ã¯å¤ããªã£ã¦ã„ã‚‹ã“ã¨ãŒå¤šã„ã§ã™ã€‚ Plaggerã«ã¤ã„ã¦ã®æ£ç¢ºãªèª¬æ˜Žã¯ Plaggerå…¬å¼ã‚µã‚¤ãƒˆ Shibuya.Plaggers Plagger Plugin ã¯ã¦ãªãƒ–ックマーク - ã‚¿ã‚° plagger ãªã©ã‚’å‚ç…§ã—ã¦ãã ã•ã„。 概è¦ã‚’知りãŸã„å ´åˆã¯å…¬å¼ã‚µã‚¤ãƒˆã®Presentationsã«ã‚る「YAPC::Asia 2006 Tokyoã€ã€ŒPlagger Conference 1 Keynoteã€ã®ã‚¹ãƒ©ã‚¤ãƒ‰ã‚’å‚ç…§ã™ã‚‹ã¨ã‚ˆã„ã§ã—ょã†ã€‚代表的ãªãƒ‡ãƒ¢ã¨ã—ã¦Elementary, ... Googleã§ã€Œã¯ã‚‰ã¸ã£ãŸã€ã¨æ¤œç´¢ã™ã‚‹ã¨ãƒ”ザãŒå±Šãよã†ã«ã™ã‚‹ã¾ã§ãŒã‚ã‚Šã¾ã™ã€‚ 解説 Plaggerã¯ã€mixiã‚„Bloglinesã‚„Webサイトãªã©æ§˜ã€…ãªã¨ã“ã‚ã‹ã‚‰ãƒ‡ãƒ¼ã‚¿ã‚’å–ã£ã¦æ¥ã¦ã€ã„ã‚ã„ã‚ãªãƒ•ã‚£
CGI::Application::Dispatchã¾ã¨ã‚ : ãŠã¾ãˆã®ãƒã‚°
ã“ã“1ヶ月ã»ã©(ãªãŒã„ãªã…)ã€ã¡ã¾ã¡ã¾ã¨å‹‰å¼·ã—ã¦ããŸCGI::Application::Dispatchã«ã¤ã„ã¦ã€ä½¿ã„方もã“ãªã‚Œã¦æ¥ãŸã®ã§ã€ã“ã“ã„らã§ã²ã¨ã¾ã¨ã‚ã§ã™ã€‚ 何ã™ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ï¼Ÿ ã“ã®å‹‰å¼·ä¸ã‚¨ãƒ³ãƒˆãƒªãƒ¼ã®ï¼‘回目ã§ã‚‚書ãã¾ã—ãŸãŒã€CGI::Applicationを利用ã—ãŸã‚¢ãƒ—リã§å¿…è¦ã«ãªã‚‹ã‚¤ãƒ³ã‚¹ã‚¿ãƒ³ã‚¹CGIã¯ä½œã‚‰ãšã«ã€URI(PATH_INFO)ã‹ã‚‰å®Ÿè¡Œã™ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã¨Runモードを決定ã™ã‚‹ã€ã¨ã„ã†ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã§ã™ã€‚newã—ã¦runã™ã‚‹ã ã‘ã®ã‚¤ãƒ³ã‚¹ã‚¿ãƒ³ã‚¹CGIãªã‚“ã‹æ¯Žå›žæ›¸ããŸããªã„よã€ã¨ã„ã†ã®ãŒãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ä½œè€…ã•ã‚“ã®æ„図ã®ã‚ˆã†ã§ã™(PODã«ã‚‚ã‚ã‚Šã¾ã™)。 URIã¯ã“ã†ãªã‚‹ CGI::Application::Dispatchを使ã£ãŸå ´åˆã®URIã¯ã€ ã¨ãªã‚Šã¾ã™ã€‚ CGI::Applicationを継承ã—ãŸMyApp::Indexã¨ã„ã†ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’作ã£ãŸå ´åˆã€ãれを実行ã™ã‚‹ãŸã‚ã®URIを比
Plaggerをインストールã—ã¦ã¿ã¦ã‚ã‹ã£ãŸã“㨠- ã¯ã“ã¹ã«ã£ã ♨
ã‚„ã£ã¨ã“Plaggerを使ãˆã‚‹ã¨ã“ã‚ã¾ã§ãŸã©ã‚Šç€ã‘ãŸã€‚livedoor Readerã®æ›´æ–°FeedãŒGmailã«ã©ã•ã£ã¨å±Šã„ãŸã‚ˆã€‚ãŠã‚‚ã—ã‚ã„。 ã•ã¦ã€Plaggerã«ãŸã©ã‚Šç€ãã¾ã§ã«ã¯ã€ã„ãã¤ã‚‚ã®ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã¨ãã®ãƒ†ã‚¹ãƒˆã®å¤±æ•—ã€ãŸãã•ã‚“ã®å¦¥å”ã€æ±—ã€æ¶™ã€ç¡çœ ä¸è¶³ãªã©ã®å›°é›£ãŒä¼´ã£ãŸã‚ã‘ã *1。ãã®ãŠã‹ã’ã§CPANã‚„Perlã«ã¤ã„ã¦ã‚ã‹ã£ãŸã“ã¨ã‚’ã‚ã’ã¦ã¿ã‚‹ã“ã¨ã«ã—ãŸã€‚ CPANã¯ä¾¿åˆ©ã§ãŠã‚‚ã—ã‚ã„ WWW::YouTubeã¨ã‹Hatena::Formatterã¨ã‹Mac::Glueã¨ã‹ã€‚ã‚‚ã£ã¨ã‚»ãƒ³ã‚»ãƒ¼ã‚·ãƒ§ãƒŠãƒ«ãªãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚‚ãŸãã•ã‚“ã‚るよã。CPANæ¼ã£ãŸã‚ŠPlaggerã®ä¾å˜ã§å…¥ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’眺ã‚ã¦ã„ã‚‹ã¨ã€ã“ã‚“ãªã®ã‚‚モジュール化ã•ã‚Œã¦ã‚‹ã®ã‹ï¼ã£ã¦ãŠã©ã‚ãã“ã¨ãŒå¤šã„。もã†ã»ã‚“ã¨è‡ªåˆ†ã§ã‚³ãƒ¼ãƒ‰æ›¸ãå¿…è¦ã‚ã‚‹ã®ã‹ã¨ã„ã†ã»ã©ã®å……実ã¶ã‚Šã€‚ CPANæ¼ã‚Šã«ã¯ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã«é–¢ã™ã‚‹ã„ã‚ã‚“ãªæƒ…å ±ãŒã‚ã¤ã¾ã£ãŸCP
LWP::UserAgent - Webデータã®å–å¾—
[Perl] LWP::UserAgentを利用ã™ã‚Œã°WEBデータをå–å¾—ã§ãã¾ã™ã€‚GETメソッドã®ã¿ã§ã—ãŸã‚‰LWP::Simpleã®æ–¹ãŒç°¡å˜ã§ã™ã€‚ã¡ãªã¿ã«httpsã§ã®å–å¾—ã‚‚å¯èƒ½ã§ã™ãŒã€Crypt::SSLeayãŒã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã•ã‚Œã¦ã„ã‚‹å¿…è¦ãŒã‚る。 [サンプル] #!/usr/bin/perl use LWP::UserAgent; my $ua = LWP::UserAgent->new; #タイムアウトをè¨å®š $ua->timeout(10); #ユーザエージェントをè¨å®š $ua->agent('Mozilla'); #GETã€PUTã€POSTã€DELETEã€HEADã®ã„ãšã‚Œã‹ã‚’指定（httpsã®å ´åˆã¯httpsã«ã™ã‚‹ã ã‘） my $req = HTTP::Request->new(GET => 'http://www.ksknet.net'); #リファラーをè¨å®š $req->ref
リリースã€éšœå®³æƒ…å ±ãªã©ã®ã‚µãƒ¼ãƒ“スã®ãŠçŸ¥ã‚‰ã›
最新ã®äººæ°—エントリーã®é…ä¿¡
j次ã®ãƒ–ックマーク
kå‰ã®ãƒ–ックマーク
lã‚ã¨ã§èªã‚€
eコメント一覧を開ã
oページを開ã
http://egg.bomcity.com/wiki?UNIVERSAL%3A%3Arequire
Template Toolkit Manual: Filters
IBM Developer
C++マニアック,Perlã®å°éƒ¨å±‹
ドメインパーã‚ング
{{#tags}}- {{label}}
{{/tags}}