どっかにあるんだろうけど探しきれなかった。特定バージョンじゃなくてモジュール自体をブクマしたいとき用。 javascript:(function(){location.href.match(/\/\~\w+\/(.+)/);var mod=RegExp.$1;mod=mod.replace(/\-[\w\d\.]+?\/$/,'');location.href='http://search.cpan.org/dist/'+mod})();
CPANモジュールの特定バージョンのページから/dist/Module-Nameなページに移動するBookmarklet - fubaはてな
どっかにあるんだろうけど探しきれなかった。特定バージョンじゃなくてモジュール自体をブクマしたいとき用。 javascript:(function(){location.href.match(/\/\~\w+\/(.+)/);var mod=RegExp.$1;mod=mod.replace(/\-[\w\d\.]+?\/$/,'');location.href='http://search.cpan.org/dist/'+mod})();
404 Blog Not Found:perl - パッチなしでパッチする
2007年04月09日16:15 カテゴリLightweight LanguagesTips perl - パッチなしでパッチする Perlに限らず、動的に名前空間を書き換えることができる言語ならコンセプトはパクれるはずのtips. 状況 人様が書いたモジュールにバグ発見! バグ直した パッチも送った でも作者が$VERSION++してくれない さあどうする? オレバージョンのモジュールをつなぎでつかう? でも標準でないものをイントールするのはいやん サブクラス作ってメソッドをオーバーライドする? でも問題のモジュールが継承をサポートしているとは限らないし そもそも問題のモジュールOOじゃなかったりもするし 代替モジュールを書いてCPANにうp? -- i.e. JSON::* でも元々のモジュールがあまりによく使われているし うpは簡単でもサポート大変そうだし.... 実例 See Al
naoyaグループ - naoyaの日記 - HTML::ContentExtractor + Lingua::JA::Summarize::Extract
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
Writing Pluggable Software
The document discusses the concept of pluggable software and its benefits, such as simplifying app design and allowing user customization. It presents practical implementations using examples like 'ack' and 'kwiki', illustrating how to integrate plugins and triggers effectively. Additionally, it addresses challenges and considerations in managing plugins within various applications.
Perlとのなれ初めの頃 - Tociyuki::Diary
いつから Perl を使っているのですかと質問をされたのが発端となり、日記をほじくりかえし記憶を辿っていました。以下、Q&A 風に。 Q1. 使い始めたのいつからですか? 1991年の春頃です。確か、4.000 よりやや後のバージョンだったはずです。 Q2. 使ってみようと考えたのはなぜですか? ニュースリーダー GNUS の作者さんが作ったことに、まず関心が向きました。Emacs Lisp で記述された GNUS のソースにはしびれていましたから。Perl も実用的でかつ便利だろうなという期待がありました。 Q3. Perl のどこが気に入りましたか? ASCII 文字列だけでなく、バイナリも扱えた点が決定打でした。read と pack/unpack がなければ、1991 年に Perl を使うことはなかったかもしれません。もう一つは、行入力と print での行末コードの扱いが C
perl - Encode-2.19 Released! : 404 Blog Not Found
2007年04月06日22:15 カテゴリAnnouncementLightweight Languages perl - Encode-2.19 Released! Encode 2.19 を Release したのでお知らせします。 Dan Kogai / Encode - search.cpan.org http://www.dan.co.jp/~dankogai/cpan/Encode-2.19.tar.gz 10ヶ月ぶりのReleaseということになります。すでにかなり安定期にあるEncodeですが、それでもドキュメントの直しや小さなbugfixは避けられません。EncodeはdistributionがCPAN Moduleとしては異例の大きさなので、ついReleaseも魔、もといここでは間、を明けがちなのですが、今回は少し明けすぎましたね。 Encode::First をリリー
書評 - PERL HACKS (日本語版) : 404 Blog Not Found
2007年04月05日13:00 カテゴリ書評/画評/品評Lightweight Languages 書評 - PERL HACKS (日本語版) 日本語版が出ていることをYAPC会場で知る。 PERL HACKS(日本語版) [英語版] そういったら「一冊やるから書評汁」ということだったので、会場にて書評。 本書「PERL HACKS」は、読んで時のごとくPerl(で|を)Hackする本である。すでにHacksはシリーズとなって久しいが、そのなかでも本書はPerlとHacksというO'reillyを代表するカンバンの二乗。面白くないわけがない。 今でこそPHPやRubyなどの他の言語本も売れているが、ラクダ本はO'reillyが地歩を固めるきっかけとなったし、OSConももともとはPerlConだった。この二つのタイトルに、PerlがOpen Sourceに対して果たしてきた役割を改めて
Perl and UNIX Network Programming (YAPC::Asia 2007) - naoyaのはてなダイアリー
YAPC::Asia で Perl UNIX ネットワークプログラミングについての発表をしてきました。UNIX ネットワークプログラミングの基礎の概論、I/O多重化の話、Perl のモダンなネットワークライブラリの話です。資料を以下に置いておきます。 http://bloghackers.net/~naoya/ppt/070404Perl_and_UNIX_Network_Programming.ppt (ppt, 122k) なお、会場では口頭で触れましたが、資料中のソースは簡単のためエラー処理を飛ばしています。また、途中で出てくる図は例えば vfs のページキャッシュをはしょってあったりとこれも簡単のため省略事項がある点にご注意ください。 それからフォントが Consolas なので Consolas が入ってない環境だと変になる、かも。
log4ZIGOROu : Module-Starterのカスタマイズ
いずれ奇麗にまとめてやろうと思ってたんですが、いい機会なのでこの辺りでmodule-starterの詳細とカスタマイズについて書いてみます。 ところで以前Module::Starterのplugin機構が面白い件についてと言うエントリを書いた事があるのですが、こちらに関して頭に入っているとより理解しやすいかもしれません。 用途別のカスタマイズ 名前とメールアドレスの設定 毎回author, emailを指定するのも面倒なので下記のように設定してしまいましょう。 ~/.module-starter/configに記載します。 author: Toru Yamaguchi email: foo@example.com これで次回からこのパラメータを指定する必要は無くなります。 新しいモジュールを追加する デフォルトのmodule-starterコマンドでは新しいモジュールを追加する事が出来ませ
Encode::First をリリース: blog.bulknews.net
Encode::First をリリース Encode::First を CPAN にリリース。ある文字列を最小の character set でエンコードしたいときに使う。使い方は、 use Encode::First; my($enc, $bytes) = encode_first("ascii,latin-1,euc-jp,utf-8", $string); という感じ。Email を送信するときとか、utf-8 を読めないメーラ対策として本文がすべて日本語なら iso-2022-jp で送る、というのを Gmail とかでもやっているんだけど、それをやりたくてつくった。 で、Traditional なエンコード (us-ascii, latin-1, iso-2022-jp, iso-2022-kr, koi8-ru etc.) を対象にして文字列をエンコードする Encode::E
String::Random - 日向夏特殊応援部隊
ランダムな文字列生成モジュール。 自分で実装しろよwって話もあるけど、使ってみたら意外と融通が効いたので、ご紹介。 #!/usr/bin/perl use strict; use warnings; use String::Random; local $\ = "\n"; my $rand = String::Random->new; print $rand->randpattern('c' x 32); print $rand->randregex('[a-zA-Z0-9]{32}'); で下記のような結果になります。 utfjtdmvnkjvqcclefoorqftuonklbzf ezAmL2ZaV599QLasO92PcAHuae2RnoNv正規表現で指定出来たりするのは凄い便利ですよねぇ。
Tk::SlideShowがなかなか素敵な件 - Charsbar::Note
にぽたんさんが Shibuya.js とかでは、JavaScript とかでプレゼンツールを自作しているのに、Perl でプレゼンツールを自作している奴は、見たことがない。 http://d.hatena.ne.jp/nipotan/20070330/1175220356 と書いておられたので、インパクトに乏しそうなWin32::PowerPointを手直しするのはやめてPerl/Tkでぐりんぐりん動くのを書いてみようかと思ったのですが、その前に確か何かあったよなとひっかかりを覚えたので、調べてみたら、やっぱりありました。Tk::SlideShow WindowsではX11::Protocolとかxlsfontsがないとか言って素直には入ってくれませんが、別にそんなんなくても（警告がうるさいだけで）動きますので、あらかじめ該当部分をコメントアウトしてインストール。 適当なフォルダを掘って、
Perl でプレゼンテーションツール - にぽたん研修所 兼 にぽたん休憩所
Shibuya.js とかでは、JavaScript とかでプレゼンツールを自作しているのに、Perl でプレゼンツールを自作している奴は、見たことがない。 YAPC::ASIA 2007 の LT 向けに、ターミナルを使った高橋メソッドなプレゼンをやろうと思って、Perl で適当に書いてみた。 →、↓、[PgDn] でページを進む。 ←、↑、[PgUp] でページを戻る。 [Home] で先頭ページへ。 [End]、C-c、C-d でプレゼン終了。 でも、ターミナルだと表現力が足りなさすぎてなんか面白くないからやめた。 そもそも Term::* 系ってほとんど使ったことがないから、よくわからないまんま作ってみて、微妙すぎて、これ以上手を加える気が失せた。 まずいないでしょうが、もし誰か使いたいっていう奇特な方がいたら、どうぞご勝手に。 #!/usr/local/bin/perl # $I
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
File::DirWalk - Hatena::Diary::Neko::kak 500 Internal Server Error
http://back-paper.labs.mfac.jp/show?paper_rid=OEF9g0a6g8 これをみて、globとか久々にみたのですが、 指定ディレクトリ以下のファイルを操作する場合はFile::DirWalkがお勧めです。 #! /usr/bin/perl use strict; use warnings; use File::DirWalk; use Path::Class qw/file/; my $dir = shift or die "usage : $0 <dir>\n"; my $dw = File::DirWalk->new; $dw->onFile(sub { my ($name) = @_; my $file = file($name); my $fh = $file->openr(); while (<$fh>) { print "$_"; }
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Client Challenge
Client Challenge
D-5 出張版 Gungho
http://d.hatena.ne.jp/lestrrat/20070330
IO::String - Yappo::タワシ