ファイルハンドルをめぐる冒険（ただしマニア向け） - daily dayflower
以下は Perl 5.8.8 のソースを元に記述しました。Perl 5.10 でもそう変わってはいないと思いますが，結構内部が変更されているので違うかもしれません。大まかには同じだと思います。 イントロダクション Perl でのファイルハンドルは内部的には [http://search.cpan.org/perldoc?IO::Handle:title=IO::Handle] オブジェクトとして保持されています。そのような記述は perl5004delta くらいでしか見つかりませんでした。ラクダ本にもなかったような。 Internal change: FileHandle class based on IO::* classes File handles are now stored internally as type IO::Handle. The FileHandle module
UTF8 フラグあれこれ - daily dayflower
UTF8 フラグについてわかってるつもりだったんですが，utf8::is_utf8 considered harmful - Bulknews::Subtech - subtech を読んで混乱したので，自分なりにまとめてみました。間違いがありましたらご指摘よろしく。 まとめ スカラー変数の内部表象の状態を示すものとして UTF8 フラグというものがある スカラー変数は（リファレンス等は別として）下記のものを格納できる (A) 文字列（内部表象: UTF-8） (B) 文字列（内部表象: ISO-8859-1） (C) バイナリ列 純粋なバイナリストリーム（画像ファイル等）かもしれないし， UTF-8 octet stream かもしれないし， CP932 octet stream かもしれないし，etc, etc ... Perl は（後方互換性確保などの理由から）ISO-8859-1
Web::Scraper を XML::LibXML で爆速にする hack! - woremacxの日記
id:miyagawa さんの Web::Scraper で、HTML::TreeBuilder::XPath の代わりに XML::LibXML を使うととても幸せになれそうなので実験してます。XML::LibXML に手を出す前に IRC で「tinyxpath とか htmlcxx とか使って xpath 周りを高速にしたい」とかボヤいてことがありました。そのときに、id:vkgtaro さんや id:tomyhero さんに激しく libxml や XML::LibXML をオススメされました。libxml をオススメしてもらえてなかったら、確実に路頭に迷ってました。以下が、変更したファイルと差分です。http://pub.woremacx.com/Web-Scraper/Scraper.pmhttp://pub.woremacx.com/Web-Scraper/Web-Scrap
use open ':std' - てきとうなメモ
[を] Perl 標準入力と utf8 404 Blog Not Found:perl - PerlIO vs. <> それ use open - odz buffer use open ':std'を使うのが一番短く済む気がする．この場合STDERRも:utf8を通しているのでencodeせずに出力することができる． #!/usr/bin/perl use strict; use warnings; use utf8; use open ':utf8'; use open ':std'; while (<>) { print if (/[ぁ-ん]/); print STDERR "$_\n"; } use open ':std'はperldoc openで説明されている． The ":std" subpragma on its own has no effect, but if comb
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
Emacs上からasinを取ってくるためにスクリプトを書いてみた - yasuhisa's blog
最近はブログをはてダラ on Emacs with simple-hatena-modeで書いているんですが、本の情報を引っ張ってくるときにいちいちFirefoxに移動してはまぞう開いて…という作業がだるい。Emacsは統合なんたら環境なのだから、すべてをemacsの上で済ませないと気がすまない。ということでスクリプトを書くことにしました。といってもelispを書けるわけじゃないのでperlで。 はまぞうをスクレイプングで取ってきてWeb::Scraperでぶっこぬいてます。出てくる結果はこんな感じ。二行目のasinを日記のところにコピペすればいいだけなので、簡単。 Excelで学ぶ時系列分析と予測 [asin:4274066665:detail] マクロ金融政策の時系列分析 [asin:4532133157:detail] 現代時系列分析 [asin:4000227610:detail]
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
perldoc のこと (Re: [kansaipm] Re: 負の添え字)
Tatsuhiko Miyagawa miyagawa at edge.co.jp Wed May 8 10:34:22 CDT 2002 Previous message: perldoc のこと (Re: [kansaipm] Re: 負の添え字) Next message: [kansaipm] Re: perldoc のこと Messages sorted by: [ date ] [ thread ] [ subject ] [ author ] 宮川です。 At Wed, 08 May 2002 23:24:50 +0900 (LMT), mishima at momo.so-net.ne.jp wrote: > それは知りませんでした。 > モジュールのソースを見たいときは、site_perl の下とかを > Meadow の dired モードでせっせと開いて探してました。
第1回 Class::Componentから始めるプラガブルモジュール | gihyo.jp
はじめに はじめまして。大沢と申します。 この連載では、筆者が実装したCPANモジュールのClass::Componentを題材にしつつ、近代的なPerlでのプラガブル(拡張可能)なソフトウェアの実装方法を紹介します。 今回は、Class::Componentの概要を説明します。 本連載で使うサンプルアプリケーション 本連載では、プラガブルなモジュールを作製するという事を考えて、Gopperというサンプルアプリケーションを元に解説を行ないます。 GopperはCodeRepos上のsvnリポジトリに置いてあるので各自checkoutしてください。 svn co -r 271 http://svn.coderepos.org/share/lang/perl/Gopper/trunk Gopper サンプルアプリケーションは連載中にも頻繁にupdateされる事が予想されますので、毎回リビジョン
ひおにっき(2007-10-01) XSを使わない型取得
_ [Program] Perl での型チェック [Perl]Scalar 変数の型を取得する のを見てちょっと書いてみた。 $ perl -MB -le 'map{my$k=$_;print "$k = ".B::class(B::svref_2object(\$_));} (1,2.1, "3",map{"$_";$_}4,5.2)' 1 = IV 2.1 = NV 3 = PV 4 = PVIV 5.2 = PVNV $ perl -MB -le 'map{my$k=$_;print "$k = ref:".B::class(B::svref_2object(\$_)->RV);} (\1, \2.1, \"3", [],{},\*STDOUT)' SCALAR(0x816a9f4) = ref:IV SCALAR(0x81c9750) = ref:NV SCALAR(0x81c97
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
[API][perl] Google Code Search を ack 風にコマンドラインから使う - bonar note
Google Code Search の API がシンプルでかなり便利っぽい。 Google Code Search Data API http://code.google.com/apis/codesearch/reference.html#Parameters 普通にサイトに行って調べてもいいのですが、基本この機能を使いたい時ってCUIな環境でコードを書いてることが多いわけで、コマンドラインで使いたい。かつ ack みたいに XTermColor なエスケープシーケンス付きだと素敵だね、ってことで書いてみました。 #!/usr/bin/perl use strict; use warnings; use Getopt::Long; use Term::ANSIColor qw(BOLD ON_YELLOW RED GREEN MAGENTA CYAN YELLOW RESET); u
![[API][perl] Google Code Search を ack 風にコマンドラインから使う - bonar note](https://cdn-ak-scissors.b.st-hatena.com/image/square/3d51f004e54b6c4fab937342a04347d47de83956/height=288;version=1;width=512/http%3A%2F%2Ffarm2.static.flickr.com%2F1326%2F804820054_c166fbd7b6.jpg)
perlnow.el - emacs extensions to speed perl development
perlnow.el is a collection of utility commands for perl programmers who use emacs. These commands are designed to help automate some routine tasks in the initial creation of perl scripts and modules. Commands are also provided to assist in running, testing and debugging inside of emacs. Detailed documentation has been included inside the *.el file itself, using the "docstrings" that are easily acc
HTML::Encoding - Determine the encoding of HTML/XML/XHTML documents - metacpan.org
NAME HTML::Encoding - Determine the encoding of HTML/XML/XHTML documents SYNOPSIS use HTML::Encoding 'encoding_from_http_message'; use LWP::UserAgent; use Encode; my $resp = LWP::UserAgent->new->get('http://www.example.org'); my $enco = encoding_from_http_message($resp); my $utf8 = decode($enco => $resp->content); WARNING The interface and implementation are guranteed to change before this module
TokuLog 改め だまってコードを書けよハゲ - ケータイシミュレータなんて使ってないで Moxy 使えばいいのに
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
subtech - Pink Blossom Diary - vim で perl の use 文を挿入
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
工夫と趣向と分別と。 - 2007-05-30の日記 - Perlの罠 - =>とコンテクスト
少し反応をいただいたので追記。 木村さんの「‘=>’の右辺にあるからリストコンテキストになるというのはちょっと違うような気がします。」について。実装の話ではなくあるべき仕様の話をしていま… 続きを読む »
SSHサーバが受け付けている認証方法を調べるPerlモジュール - （ひ）メモ
を、CPANに上げしました。 Net::Scan::SSH::Server::SupportedAuth 予め Math::BigInt::GMP をインストールしておくのをお勧めします。じゃないと、Net::SSH::Perl (が使っている Crypt::DH) が遅くて、まともに使えませんので。 このモジュールは、SSH protocol 1と2のそれぞれについて、どの認証方法（パスワード認証か鍵認証か）が受け付け可能か調べるためのものです。 アーカイブには、sample/scan-sshauth.pl というサンプルスクリプトもあるので、モジュールをインストールすれば、コードを書かずとも試してみることができます。 ちなみにこのサンプルスクリプトは、 ホスト名 IPアドレス CIDR に対して調査できるので、出力などは用途にあうようにアレンジして、 外部にさらしているサーバたち イン
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
perltidy-mode-0.02
昔ココログというブログでHASHというのが結構よく出ていたのだが | 裏表(Phinloda のもう裏だか表だか分からないページ)