perl - 勝手に添削 - Lingua::JA::Summerize 0.02 : 404 Blog Not Found
2006年04月28日15:30 カテゴリLightweight Languages perl - 勝手に添削 - Lingua::JA::Summerize 0.02 突然ですが、勝手に添削の時間です。 Perl Best Practices Damian Conway 今回は、 Kazuho@Cybozu Labs: Lingua::JA::Summarize 0.02です。 まずは、Editorで開いてみないと見づらいところ。 インデントにtab("\t" ; "\x09")を使うのはやめましょう。tabは必ずspace("\x20")に拡張しましょう。 タブストップの数は、環境によって異なります。にも関わらず違うように表示されるのはさけなければなりません。perlではこれは致命的ではありませんが、pythonやhaskellでは致命的ですし、Perl内部でも手でYAMLなどを書いて
配布開始 - FreeBSD-amd64-8.0R.vmwarevm : 404 Blog Not Found
2009年11月28日07:45 カテゴリAnnouncementiTech 配布開始 - FreeBSD-amd64-8.0R.vmwarevm VMWare Fusion 3 というわけでVMWare Fusion 3販売開始記念 & FreeBSD-8.0-Release 記念、というわけではないのですが、基本設定済みのFreeBSD8.0-Releaseの仮想マシンをtorrentで配布しはじめたのでお報せします。 http://colabv6.dan.co.jp/vm/FreeBSD-amd64-8.0R.tbz.torrent MD5 (FreeBSD-amd64-8.0R.tbz) = c8c6b5c8ca7133953c3e357346d6afdd きっかけは、こちら。 404 Blog Not Found:GNU Emacs OS 作った(笑) われながらしょーもないネタ
VMWare Fusion 3 と新型iMacの相性が最高な件 : 404 Blog Not Found
2009年11月07日22:00 カテゴリ翻訳/紹介Tips VMWare Fusion 3 と新型iMacの相性が最高な件 APPLE iMac 21.5インチ 3.06GHz 500GB MB950J/A アップル というわけで、家族共用のiMacを、G5から五年ぶりに更新したのですが、これが素晴らしい。 何が素晴らしいかというと、メモリーが2GBから8GBと一挙四倍になったこと。 これだけあると、俄然生きてくるのが VMWare Fusion 3。あわせてVMWare Fusion 2からアップグレードしたのですが、もう最高です。 何が最高かというと、仮想マシンを iMac 側で動かしておいて、それを MacBook -- に限らず VNC クライアントから見れること。今までも仮想マシン上のOSが VNC サーバーになっていれば見れたのですが、VNC自体がサーバーをやってくれるおかげ
perl - open my $fh, "comand |"; # はモダンじゃない : 404 Blog Not Found
2009年02月10日01:00 カテゴリLightweight Languages perl - open my $fh, "comand |"; # はモダンじゃない モダンPerl入門 牧大輔 「モダンPerl入門」発売記念ということで、同書を補足するentryを。 同書でちょっと残念だったのが、[5.2 外部コマンドの実行]。あまりモダンではないのだ。 P. 141 system("/sbin/wget", "http://example.com"); これはいいのだが、以下がちょっとまずい。 my $output = `/bin/ls tmp`; open(my $fh, '| cat -v'); これ、何がまずいか、というと、コマンド実行の際に/bin/shを使ってしまうのだ。そのおかげでcommand < from > to 2&>1のようなリダイレクトも使えるなどの利点もあ
#yapcasia2009 - Perl? Which Perl? : 404 Blog Not Found
2009年09月11日15:00 カテゴリYAPC::AsiaLightweight Languages #yapcasia2009 - Perl? Which Perl? 〆切と体調不良で数え役満状態ではありましたが、なんとか自分の分のtalkを終えました。 以下からご覧下さい。 YAPC::Asia::2009 - Perl? Which Perl 実際にllevalで動作させながらプレゼンしました。あわせて以下もご覧下さい。 http://colabv6.dan.co.jp/lleval.html http://blog.livedoor.jp/dankogai/archives/51190474.html (Japanese) Enjoy! Dan the Perl Monger, Whichever Perl It May Be 「YAPC::Asia」カテゴリの最新記事
カツマーの取説 - 書評 - 勝間和代現象を読み解く : 404 Blog Not Found
2009年08月25日11:30 カテゴリ書評/画評/品評Love カツマーの取説 - 書評 - 勝間和代現象を読み解く 徹子の部屋を観てから書こうと思ったけど、それまで体力が持たないので。 勝間和代現象を読み解く 日垣隆 こういうのも何だけど、むしろ勝間和代(敬称略)の側、すなわちワークライフバランスの体現者としてライター代表の著者がこういう本を出すのが意外と言えば意外だが、読後感は当然といえば当然。なぜならどちらも「まねる力」がパネェからだ。少なくとも、勝間和代本としては「しがみつかない生き方」(香山リカ)より前向きだし役に立つ。 それと同時に、同じワークライフバランスを体現するにしても、男女ではこうも違うかという感想も強く持った。本entryでは主にそちらに触れる。 本書「勝間和代現象を読み解く」は、二女一男の父にして、日本で最も「独立」し、かつ定期刊行物、出版物、講演、そしてメール
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
perl - use encoding; #は黒歴史 : 404 Blog Not Found
2009年06月08日14:30 カテゴリLightweight Languages perl - use encoding; #は黒歴史 ぎゃあぁぁ length関数で文字列の長さを求める - perl初心者BLOG - Hatena::Group::Perl 日本語の文字数を正確に求めたい場合、use encodingを指定する use encoding;は、jperlなど、かつて存在したL10Nされたperl用に書かれたレガシースクリプトを、モダンperlで動かすときのためのおまじないです。こういう目的で利用すべきではありません。 このあたりのことは、以前 404 Blog Not Found:perl - no encoding; # whenever possible でも書いたのですが、大事なことなのでまた書きます。 スクリプトはUTF-8で書き、use utf8;する のがモ
regexp - ^$でなくて\A\zを使おう : 404 Blog Not Found
2009年03月09日00:30 カテゴリLightweight LanguagesTips regexp - ^$でなくて\A\zを使おう まずは回答から。 正規表現で「制御文字以外」のチェック - ockeghem(徳丸浩)の日記 文字エンコーディングの妥当姓 制御文字(\x00〜\x1f, \x7f)のチェック 文字列長のチェック このうち後ろ二つを正規表現として書くにはどうすればいいかを考えていました。 こういう時には、「全文字がOKならOK」と考えるのではなく、「一文字でもNGならNG」と考えると楽になります。それは「スペースと非制御文字以外」なのですから、/[^ \S]/が求めていた正規表現で、=~ではなく!~が使うべき演算子ということになります。全角スペースもOKにしたければ、/[^ \x{3000}\S]/。[追記参照] [Run via Codepad] #!perl -
javascript - ソースを見せてかつ動かすための３つのtips : 404 Blog Not Found
2009年02月24日04:30 カテゴリLightweight LanguagesTips javascript - ソースを見せてかつ動かすための３つのtips livedoor Blogを私が愛用しつづけている理由のひとつが、JavaScriptを受け付けること。 おかげでかなりのentriesが溜まりましたが、それだけにで実行用のソースと表示用のソースを用意するのが人一倍おっくうに感じられます。そんなわけで、どうやれば怠慢をもっと発揮できるかをまとめてみました。 0. DOMにIDをふらずにデモる こんな感じのデモがあったとしましょう。「404 Blog Not Found:javascript - Array#sortがオレquicksortより遅い!?」にあるものを書き直したものです。 # of Items: よくあるのは、inputタグやpreタグにIDをふって、docume
javascript - block代わりのclosureとその問題 : 404 Blog Not Found
2009年01月19日18:15 カテゴリLightweight Languages javascript - block代わりのclosureとその問題 リハビリに手頃な問題だったので。 これ、実は「Java開発者のためのAjax実践開発入門」でも紹介されている書き方。 for 文と無名関数のイディオム - IT戦記 というわけで、これをすべて解決するのが for (var i = 0, len = list.length; i < len; i++) (function(node, i) { var text = node.textContent; node.onclick = function() { alert(text) }; })(list[i], i) なのだ。 ただし、コメント欄に残された問題が残る。 自分でも検証してみた。 n = : これ、デフォルトでは100万回にして
DNSのバイブルも買い替え時 - 書評 - DNS & BIND 第五版 : 404 Blog Not Found
2008年12月17日15:00 カテゴリ書評/画評/品評iTech DNSのバイブルも買い替え時 - 書評 - DNS & BIND 第五版 オライリー矢野様より献本御礼。 DNS & BIND 第5版 Cricket Liu / Paul Albitz 小柏伸夫訳 [原著:DNS & BIND, 5nd Ed.] これまたバイブルの一つであるが、買い替えるにはちょうどよい一冊。 BINDほどインターネットの世界に長くデファクトスタンダードとして君臨したソフトウェアもないが、しかしBINDほど時代とともに設定項目が変わったソフトウェアもまたないのだから。 本書「DNS & BIND 第五版」は、Domain Name Systemと、それを構築するのに未だに最もよく用いられているソフトウェア、BINDのバイブル。 目次は長いので最後に添付するとして、DNSとは何か、BINDとは何かだけ少
Perl - "Higher Order Perl" が無料ダウンロード可能に : 404 Blog Not Found
2008年12月10日12:30 カテゴリ書評/画評/品評Lightweight Languages Perl - "Higher Order Perl" が無料ダウンロード可能に はてぶ経由で知ったのだけど、すごい。 Higher Order Perl Mark Jason Dominus Higher-Order Perl これ、Perl Mongesだけではなく Rubyists にも Pythonistas にも JavaScripters にも、いわゆる高階関数が使えるプログラミング言語のユーザーすべてにお勧めです。高階関数が単に面白いだけではなく、非常に役に立つこともわかります。 PDF版をダウンロードしたのですが、特にありがたいのは、テキスト、すなわちコードもコピペ可能なこと。検索と引用は本のアキレス腱なので。 その一方で、600ページ近いこの大著を通読するのは、紙の方が向い
perl - Scalar::Util::dualvar() : 404 Blog Not Found
2008年10月24日22:30 カテゴリLightweight Languages perl - Scalar::Util::dualvar() 久しぶりにPerlの話題。 sinkin' in the rain - Perlの==とeq つまり、eqは純粋に「文字列として比較した時に一致するか」を返しているみたい。言いかえれば、eqこそ常に、文字列に暗黙的に変換（キャスト）をかけてから比較しているみたい。 s/みたい//g#でおk というのはさておき、こんなことも出来ますよ、という話題。 一目見れば、何をしているかおわかりいただけるかと。 use strict; use warnings; use Scalar::Util qw/dualvar/; my $forty2 = dualvar 42, 'forty two'; print "$forty2\n"; print $forty
javascript - のみでQRCode! # thanx, google! : 404 Blog Not Found
2008年07月05日02:30 カテゴリLightweight Languages javascript - のみでQRCode! # thanx, google! [を] Google Chart API で QRコードも生成してくれるようになった新たに QRコードを生成してくれるオプションができました。 - QR codes (Developer's Guide - Google Chart API) http://code.google.com/apis/chart/#qrcodes ほう、それはめでたい。 「QRコードブログ」とかが手軽にできそうです。 というわけで、手軽につくってみた。 Demo: Size: Text: Encoding: ラク過ぎですなあ。むしろ漢字まじりの場合、Shift_JISにしないとケータイで読む時文字化けするというのが一番引っかかったところだったり
perl - 勝手に添削 - Perl入門#1@ITPro : 404 Blog Not Found
2008年06月03日06:00 カテゴリLightweight Languages perl - 勝手に添削 - Perl入門#1@ITPro さすがに出典が日経Linux 2003年7月号だけあって、少しトウがたってはいるけど、現在でもわずかな修正で使える記事。さすが川合さんといったところか。 第1回 Perlの文法の基本：ITpro というわけで、この記事の「現代化」Patchを。 全般 use strict;だけではなくuse warnings;も加えましょう。 さらに，調べても分からないことがあれば，メーリング・リストやユーザー・グループ＊2に質問してみてもよいでしょう。 blogに書くのもアリです。あと私は使っていないけどIRCとか。 ビルトイン関数は()でくくらない方が視認性が上がります。 before: chomp($sLine); after: chomp $sLine;
perl - glob,readdir, and regexp : 404 Blog Not Found
2008年05月31日00:30 カテゴリLightweight Languages perl - glob,readdir, and regexp なかなか良い仕事をしてくれているid:perlcodesampleだが、今回のこのタイトルはどうかと思う。 カレントディレクトリのファイル一覧を取得する。 glob - サンプルコードによる Perl 入門 というのも、glob()で得られるのはカレントディレクトリのファイル一覧とは限らないし、何よりファイル一覧を取るにはreaddir()という関数が別に存在するからだ。 例えば、以下のようにした場合、得られるのはカレントディレクトリではなくルートディレクトリにあるファイル一覧だ。 [codepad] print "$_\n" for </*> glob("*")または<*>は、以下とほぼ等価である。 [codepad] my @files
perl - モジュールと%INC : 404 Blog Not Found
2008年02月22日23:30 カテゴリLightweight Languages perl - モジュールと%INC うむむ、ちょっとload averageが高い日日が続いたせいか、久々に熱が。 こういう時にはこういうあまり心身を使わないネタを。 Perl モジュールのありかを調べる perlwhere - Tociyuki::Diary モジュールのパスをてっとり早く見つけるには、コア・モジュールの Module::Build::ModuleInfo が便利です。 Module::Buildがコア入りしたのは5.10からなので、他の方法を紹介しつつ、特殊変数%INCの紹介などを。 まず、モジュールのありかを手っ取り早く調べる方法としては、 % perldoc -ml が使える。PODが含まれてなくてもOK。 しかし、中級以上の perl monger を目指すのであれば、%INCの
perl - stat()、-X 演算子、そして _ ファイルハンドル : 404 Blog Not Found
2008年05月12日13:30 カテゴリLightweight Languages翻訳/紹介 perl - stat()、-X 演算子、そして _ ファイルハンドル こういった場合のTipです。 ファイル演算子「 -s 」で、ファイルサイズを取得する。 - サンプルコードによる Perl 入門 if( -f $file ){ my $file_size = -s $file; print "$file のファイルサイズは、$file_size バイトです。\n\n"; } else{ print "$file は、存在しませんでした。\n\n"; } _ ファイルハンドル 実は、-X演算子は、その演算子に期待された結果を返すだけではなく、その他のファイル情報を特殊ファイルハンドル_にセットします。これを使うと、上のコードは if( -f $file ){ my $file_size =
perl - 文字参照を(en|de)codeする : 404 Blog Not Found
2008年05月11日21:00 カテゴリLightweight LanguagesTips perl - 文字参照を(en|de)codeする すでに正解が書かれていますが、 [を] Unicode の16進数の実体参照を正規表現などで元に戻す pack と Encode::decode を使うと良いみたい。 はてなブックマーク - miyagawaのブックマーク / 2008年05月11日 それ HTML::Entities::decode / regexp でも chr(hex($1)) のほうがわかりやすくないかな 繰り返しておくだけの価値はあるので。 HTML::Entitiesを使う まず、HTML::Entitiesのdecode_entities()を使うという方法があります。これがベストプラクティスかな。 #!/usr/local/bin/perl use strict;
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
