まるごとPerl - naoyaのはてなダイアリー
まるごとPerl! Vol.1 の見本誌が届きました。興味の沸いたところを目を通してみましたが、結構いい仕上がりになってますね。ちょっと濃ゆすぎる気もするけど(笑) まるごとPerl! Vol.1 作者: 小飼弾,宮川達彦,伊藤直也,川合孝典,水野貴明出版社/メーカー: インプレス発売日: 2006/08/24メディア: 大型本購入: 7人 クリック: 123回この商品を含むブログ (115件) を見る 基礎編がいきなり「まるごとEncode」で椅子からずり落ちそうになりましたが、読んでみたら、Encode の中の人が書いただけあって正確かつ分かりやすかった。Unicode 絡みでいまいち理解があいまいな人にはおすすめかもしれない。かく言う僕も、ああ、そういうことだったのかーと読みながら思ったり。 フレームワーク特集の中では、id:charsbar さんが書いた Jifty のチュートリア
livedoor クリップのクリップをはてブにブクマしてみる件 : にぽたん研究所
livedoor クリップとかいうソーシャルブックマークがオープンしていたので、使ってみたんだけど、元々はてブユーザの自分としては、livedoor クリップに登録したクリップを全部はてブにデータ移行が出来たらなぁとか思った。 なので、livedoor クリップからはてブに移すのを作ってみた。 どうも livedoor クリップにはまだ API 的なものが用意されていないっぽいので、LWP を使ってスクレイピングして、XML::Atom::Client を使ってはてブに post するというあまり綺麗じゃない方法を取ってみた。 で、WebService::SyncSBS::D2H にあやかって WebService::SyncSBS::L2H という名前にしようと思ったけど、メソッドとか互換させたわけでもない…けど、livedoor クリップは Web Service と呼べないが、はてブ
Test::Class - naoyaのはてなダイアリー
最近 Perl でテストを書くときに Test::Class を使ってます。(もしかして常識?) これまでは *.t で Test::More をそのまま使ってたけど、テストが大きくなってくるとコードが分かりにくくなったり、自分であれこれしなきゃいけないことが多くてめんどくさい。 Test::Class は xUnit スタイルで Perl のテストを書けるフレームワークです。xUnit な Perl 実装といえば Test::Unit もあるんですが、テスト用の関数も Test::Unit の流儀に従う必要があってちょっと嫌。Test::Class は Test::More と Test::Harness とか、普段使い慣れてる Perl らしいテストスタイルを使いつつ xUnit できるという点が良いです。 使い方ですが、 Test::Class を継承したテストクラスを作り テスト用
Perl の開発環境 - naoyaのはてなダイアリー
人力検索でPerlの開発環境はどんな感じ?という質問があがっていて、にわかに盛り上がって(?)いますね。僕も回答してみました。 一般的にPerl使ってる人はWindowsで開発する人が多いんですかね？サーバにログインして、ターミナル上で開発をする人って結構少ないのかなぁ。 自分なんかローカルで一応Active Perlをインストールしているけど、ほとんど使わないし…。普段はサーバにログインしてそこでemacsで開発、ローカルでやるとしたらcolinuxにログインしてそこで開発って感じです。Windows上にソースを置くということはしてませんねぇ(あ、colinuxはWindows上か…) その感想として Emacs とか vi 使わないの? っていう話。mixi なんかを見てても僕の周辺で同じ感想を持ったひとが多かったようで。 やっぱり Perl は PC-UNIX を含む UNIX との
複数のRSSを1つにまとめてFTPでサーバーに置くプログラムmergerss - himazu blog
動機 mixiにはブログのRSS配信を「日記」として登録できるが、登録できるRSSは1つだけである。自分の複数のブログの更新をmixiで知らせたいと思い、RSS配信を1つにまとめるFrankenfeedを使ってみたが、思ったようには動作してくれなかった。 そこで、mergerssというプログラムをPerlで書いた。最初はCGIとして書こうかと思ったが、そうするとCGIを実行できる場所を確保しなければならない。使用目的がブログの更新を知らせることなので、複数のRSSをまとめたRSSファイルを作成して、それをウェブサーバーに置いておけばいいと考えた。ブログの記事を書いた際に、mergerssを実行しなければならないが、大した手間ではない。 2006-06-20追記 はてなブックマークでCGIとして動くものが欲しいというコメントをいただいたので、その機能を加えた。プログラムをmergerss.c
RedHanded � Speeding Up Net::HTTP, OpenURI or Any Other TCPSocket Offspring
Speeding Up Net::HTTP, OpenURI or Any Other TCPSocket Offspring # Only if you’re doing lots of requests amongst threads and you notice that the opening of the socket is blocking everything. require 'resolv-replace' And if you are, then it’s the Matz’ pajamas. From his own tongue: I’m sorry if you feel offended, it’s not my intention. But if getaddrinfo() on your system does not work as you expect,
perl - HateBinarySearch : 404 Blog Not Found
2006年06月18日02:40 カテゴリLightweight Languages perl - HateBinarySearch どうせなら自動化したい、というわけで自動化してみた。 laiso(2006-06-17) 例えばhttp://fragments.g.hatena.ne.jp/はhttp://b.hatena.ne.jp/bookmarklist?url=http://fragments.g.hatena.ne.jp/&of=11200 なので、現在(2006/06/17 21:14)は「11200 + 1」で被ブックマーク数値は11201 bmというわけである使い方はこんな。 % perl hatebinserch.pl http://blog.livedoor.jp/dankogai/ of=819200 at hatebinserch.pl line 25. of=4
perl - 100までの素数 : 404 Blog Not Found
2006年06月16日22:00 カテゴリLLの夏Lightweight Languages perl - 100までの素数 なに前哨戦とな? キミならどう書く 2.0 - ROUND 1 - ? Lightweight Language Ring お題は「100までの整数から素数を列挙せよ」です．まずはCPANから。Perlから、と言わないところがミソ。 perl -MMath::Prime::XS=primes -le '$,=" "; print primes(100)' primesをsieve_primesとするとさらに高速。$,の使い方にも注目。 次にabigailの傑作の変種。 perl -le '$,=" "; print grep { (1 x $_) !~ /^(11+)\1+$/ } (2..100)' なんでこれで素数判定できるかは、読者の宿題。 最後に、割とけれん
404 Blog Not Found:perl - ('ぁ' .. 'ん') は動きません
2006年06月08日17:30 カテゴリLightweight Languages perl - ('ぁ' .. 'ん') は動きません PerlのRange Operator, ..は便利なものですが、限界もあります。 my @alpha_small = ('a' .. 'z'); は期待通りに動いても、 my @hiragana = ('ぁ' .. 'ん'); はそうはならないのです。 ただし、簡単な解決策もあります。 my @hiragana = map { chr } (ord('ぁ') .. ord('ん')); Perl 5.8.1 以降は tr/ぁ-ん/ァ-ン/も、qr/[α-ω]/も使えるのに、範囲演算子はそうでないというのはバグに見えないこともないですが、私自身はこれでもいいと思います。というのも範囲演算子の場合、$a .. $bという変数も受け入れなければならないから
ひげぽん OSとか作っちゃうかMona- - [Perl] XS利用でPerl高速化
（追記：2009/03/25） id:tokuhirom さんからコメントを頂きました。このベンチマークは問題があるそうです。 http://d.hatena.ne.jp/higepon/20050615/1118829090#c （追記：終わり） PerlにはC言語で書かれた関数を呼び出すためにXSという仕組みが存在します。 一部CPANモジュールでも使われているためご存知の方も多いと思いますが、今回はこのXSの簡単な利用方法を紹介したいと思います。 なおXSは、はてなでも使用しています。 さてXSモジュールを使うとうれしい事は C言語で書くことにより、処理が高速になる可能性がある 既存のC言語ライブラリ資産をPerlから利用することができる Perlがあまり得意でない、メモリ内などに存在するビット単位での細かなデータ構造を、あれこれできる などが挙げられると思います。 今回は、高速化に
![ひげぽん OSとか作っちゃうかMona- - [Perl] XS利用でPerl高速化](https://cdn-ak-scissors.b.st-hatena.com/image/square/c8c4bb60cf47745b4128808788a15216f5f5dcdf/height=288;version=1;width=512/https%3A%2F%2Fogimage.blog.st-hatena.com%2F13208692334729888502%2F17391345971656215022%2F1529549377)
Perl Hacks - naoyaのはてなダイアリー
オライリーの中の人から一足先に Perl Hacks をいただきました! ありがとうございます。 Perl Hacks: Tips & Tools for Programming, Debugging, and Surviving 作者: Chromatic,Damian Conway,Curtis "Ovid" Poe,Curtis (Ovid) Poe出版社/メーカー: O'Reilly Media発売日: 2006/05/18メディア: ペーパーバック クリック: 18回この商品を含むブログ (22件) を見る で、やばいですよこれは。Perl Hacker 必読な感じですよ! Perl Hacks taps into the collective wisdom of the world's most creative Perl gurus, so you can learn fro
YAPC::Asia::2006 vids are now online! : 404 Blog Not Found
2006年05月17日02:20 カテゴリYAPC::Asia YAPC::Asia::2006 vids are now online! 忘れた頃に絶妙のタイミング。 YAPC::Asia 2006 Tokyo (Japanese) - YAPC::Asia のビデオを公開しました おまたせしました。YAPC::Asia 2006 で撮影したビデオを QuickTime フォーマットで公開しました。 Internet Archive (archive.org) からダウンロードできます。 手前味噌ながら、お宝映像満載です。 k.daibaさんはじめ、関係各位ありがとうございました。 Random Quotes: Damian: Perl5 source code is scary. Are you scared, Larry? Larry: I'm not scared enough.
404 Blog Not Found:perl - "Hello, world!"から始めたくない人は
2006年05月18日14:00 カテゴリ書評/画評/品評Lightweight Languages "Hello, world!"から始めたくない人は - 書評 - Perl Cookbook この答えもまたPerlらしく、"More than One Book to Read"なのだが、すでに他のLightweight Languagesをある程度知っているという人ならこちらだろう。 Perl Cookbook (English) Christiansen / Torkington [邦訳: Perlクックブック] F's Garage：Perlを勉強する順番Perl の学習コストを大幅に軽減するスゴイ方法に書いてある、以下の本から、まずはこれは読んでおけというオススメの本があったら教えてくださいってのと、読む順番がよくわからんので教えてください。 以前にも何度か紹介したのだが、単体で
Perl Monger の質問 - AUTOLOADって他でどうやるの? : 404 Blog Not Found
2006年05月12日17:00 カテゴリLightweight Languages Perl Monger の質問 - AUTOLOADって他でどうやるの? PerlのOOにおける強力な機構の一つに、AUTOLOADがあります。 Advanced Perl Programming, 2nd Ed. Simon Cozens [邦訳:実用Perlプログラミング第2版] 具体的に他の言語でAUTOLOADを実現する方法にはどんなものがあるでしょうか? たとえば、こんなことをしてほしいClassを考えます。 use strict; use warnings; use Unicode::Char; my $u = Unicode::Char->new; binmode STDOUT, ":utf8"; # 小飼弾と表示 print $u->u5c0f, $u->u98fc, $u->u5f3e,
Amazon倉庫はニートでも出来る簡単なお仕事らしい : オーニソプターズ
作業内容 ルンバみたいな自動で送られてくる棚に商品をバーコードでスキャンして入れるだけ ノルマは１日3000件 拘束時間11時間(勤務時間10時間プラス休憩1時間) 時給1050円 なんj民にオススメ
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Template::Extract XML::RSS でRSS 生成 : NDO::Weblog
Perl:my vs global , my vs local - Yoyoyo
perl ハッカーの方々にお聞きします。近頃ますます良い感じなperlですが、どのような開発環境で開発していますでしょうか。…
Perl 5.8.x Unicode 関連
Web Reference - Code Documentation, Tutorials, and Demos