2010年10月03日02:00 カテゴリLightweight Languages perl - Acme::Akashic::Records 0.01 Released アカシックレコードをPerlから読みたいのですがモジュールありますか。 CPANを軽く捜しましたが見当たりません。 - 人力検索はてなアカシックレコードをPerlから読みたいのですがモジュールありますか こちらをお使い下さい。 /lang/perl/Acme-Akashic-Records/trunk - CodeRepos::Share - Trac dankogai's p5-Acme-Akashic-Records at master - GitHub Dan Kogai / Acme-Akashic-Records - search.cpan.org (Coming Soon) アカシック・レコードとは、このよ
Re: Perlスクリプトの一行目には何と書くべきなのか もしCPAN形式でスクリプトを配布するなら、それは#!/usr/bin/perlないし#!perlとするべきで、env(1)を使うべきではないと思います。 CPAN形式のディストリビューションでは、インストールするスクリプトのshebang行をインストール直前に修正し、正しいパスに書き換えてくれます。ただし、このルーチン*1はいまのところenv(1)を認識してくれません。つまり、env(1)を使った場合、インストールに使用したperlと実際に実行されるperlが一致するとは限りません。perlを一つしかインストールしていないシステムなら、これでも問題なく動きます。しかし最近では、システムにインストールしてあるperlには触らず、アプリケーション用のperlを別途perlbrewなどでインストールしてそちらを使うということもよく行われ
一部の方はすでにご存じの通り、先日 "RUBY"や"OPENSOURCE"などの商標登録が出されていた他、"Perl"および"パール"の商標登録がプログラミング言語Perlの開発およびコミュニティと全く関係のない法人（テラ・インターナショナル）により出願され、受理されてしまっていることが発覚いたしました。 Japan Perl Association (JPA) としては本件に関して法的な対応をするかどうかを含め検討中ですが、取り急ぎ現実的にプログラミング言語「Perl」を日常的に使用されている皆様に向けて現在の状況とそれに対してどのように対応するべきかJPAとして調査した結果をお知らせいたします。 まず プログラミング言語「Perl」を自社製品、サービスに対して使用することについてはなんの問題もございませんし、それを使って作られた製品を使用・開発することに対して使用料等が発生することはあ
2010年05月13日04:00 カテゴリLightweight Languages (gc)c - block?それってnested functionで出来るよ! 残念ながらBlocksが使えるのはOS Xのみであるが… Binary Hacks 高林哲 / 鵜飼文敏 / 佐藤祐介 / 浜地慎一郎 / 首藤一幸 PerlエンジニアのためのObjective-C Blocks入門 - unknownplace.orgOS X 10.6 以降の xcode では Objective-C に Blocks というシンタックスが追加されている。 gccであれば、Nested Functions というものが使える。 例えば、以下はcodepadでも動く。 http://codepad.org/V3uDduYT #include <stdio.h> int main(int argc, char*
5月1日に奈良県・王寺やわらぎ会館で開催された「Kansai.pm第12回ミーティング」に参加してきました。 参加者・運営者の皆様方、ありがとうございました。 今回も準備・運営をほとんど任せてしまった…。もっと動かないと…。 ImageMagickとImage::ExifToolのキホン 初歩的な内容ですが、ImageMagickとImage::ExifToolについて少し発表させてもらいました。 発表資料 → http://www.scrapcode.net/files/ImageMagick-ImageExifTool.pdf 話したかったのは画像加工のテクニックではなく、画像加工後のExifの不整合の問題だったのでした。 ダイアリーで書こうと思って途中まで下書きしていたものを、構成をやり直して発表に使いました。 GeoHexを使ってみた おまけネタとして用意していたものも、ネット接続
2010年04月23日07:00 カテゴリLightweight Languages perl - Unicode「'あ'はAlphabetですが、何か?」 結論から言うと、仕様です。 Is "あ" an alphabet? - FloralCompany.log use utf8; print 1 if "あ" =~ /\p{IsAlpha}/; print 2 if "あ" =~ /\p{Alphabetic}/; print 3 if "あ" =~ /[[:alpha:]]/; ﾅﾝﾃﾞﾔﾈｰﾝ それも、PerlではなくUnicodeの。 UAX #44: Unicode Character Database Characters with the Alphabetic property. For more information, see Chapter 4 in [Unicode
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
cpan-outdatedを使うとメモリ制限のきついレンタルサーバーでもCPANモジュールが楽に更新できる http://search.cpan.org/dist/App-cpanoutdated/ 個人サイトで借りてる貸しサーバーはシェルが使えるんだけどroot権限が無く各種メモリの制限も強い。で、CPANコマンドを使うとlimit制限にひっかかってmoduleindexを伸張するところでOut of memoryエラーが出て落っこちちゃうという状態なんだけど。 今までは仕方がないからtar.gzでモジュールソースをもってきてperl Makefile.PL && make && make installと古典的な手段で入れていた。 しかし cpan-outdated を使うことでcpan使わずに楽に更新できるようになった。 cpan-outdated | xargs cpanmで古いモ
-> 趣旨と注意書き -> 身近なpackage -> なんのためのpackage ? -> What's `new' ? -> bless ( reference => package ) -> Hello, Module World! -> オブジェクト？ -> main パッケージと関連付けてみる -> クラスとメソッド -> オブジェクト指向 -> オブジェクトがリファレンスなら… -> -> を連続する -> 継承 -> 多重継承 -> 多重継承をやめる -> 多重継承をやめる(もう少し簡単に) -> 情報源(書籍等) <- モドル 趣旨と注意書き これを読んでも、あんまりきちっとした知識は、身に付きません（^^; オブジェクト指向の概念はほんの少ししか説明しません。ここで述べるのは、Perlでどうやるかってのが主です（それも不十分＆嘘まじりかも）。 とりあえず、モジュールを作り
今年もよしなにお願いいたします 連載第18回ではlocal::libの話題を取り上げましたが、今回はそのときにもちらと紹介した、モジュールをインストールするときに利用するいくつかのモジュールについて簡単にまとめてみます。 ExtUtils::MakeMakerが生まれるまで Perlがバージョン3でコンパイル時にユーザ独自のライブラリを組み込んで本体機能を拡張できるようになったとき（1990年）、おそらくもっとも喜んだのがデータベースを使っていたユーザでした。彼らはいそいそと自分の使っていたデータベースのライブラリをPerlに組み込み、それとわかる名前をつけて公開しました。当時の記録によれば、Oracleに対応したOraperlやPostgreSQLに対応したPgperlなど、データベース関連だけで8つないし9つの専用Perlがあったようです[1]。 でも、このアプローチには問題もあ
ぼくがお金がなくてラクダ本を買えなかった時に、 こんな情報があればいいなぁと思っていた内容をまとめてみます。 なので、出来るだけフリーのドキュメントを見て内容を確認できるようにしたいと思います。 ちなみに、こちらで動作を確認している Perl のバージョンは 5.6.1 なので、 ドキュメントなどもそのバージョンのものをリンクするようにします。 パッケージ、クラス、モジュール 具体的なクラスの作り方やオブジェクト指向プログラミングの方法などは、 「perltoot - トムによるPerlオブジェクト指向チュートリアル」を何度も読めばわかると思います。 っていうか、ぼくもそれしか読んでないんです。 ごめんなさい。 以下は、そこに書いてある方法で書いた Perl モジュールを、 配布できる形にパッケージングするためのやり方です。 h2xs モジュールを作るには、まず h2xs *1 というおま
twitterのOAuthベータが開始されたので、さっそく軽量Web Application Framework「MENTA」でOAuthする物を作ってみた。 構成も簡単で │ .htaccess │ menta.cgi ├─app │ ├─controller │ │ callback.pl │ │ request.pl │ ├─data │ └─static ├─bin ├─lib └─plugins session.pl こんな感じ。トップページからrequest.plに飛び、OAuthのcallbackとしてcallback.plがキックされる。 要のrequest.plは以下の様な感じ use MENTA::Controller; use URI; use OAuth::Lite::Consumer; sub run { my $consumer
HTMLをパースしてくれるHTML::Parser。検索結果で出てくるマニュアルはいまいち分かりづらかったので、自分なりの試行錯誤メモを残しておく。 HTMLを読み込んで、特定タグの要素を抜き出す。 a タグと img タグだけの簡単なHTMLを用意して、それぞれに指定されたhref属性とsrc属性を抜き出してみる。 <html> <head> <title>TEST</title> </head> <body> <a href="http://kirinji.amayan.jp/"><img src="http://kirinji.amayan.jp/kirinji_top.gif"></a> </body> </html> で、これをHTML::Parserで解析してみる。 #!/usr/bin/perl use strict; use warnings; use HTML::Pars
HTML::Parserの使い方を探してると、いわゆる「手続き型」の使い方がよくヒットする。 一つ一つのイベントごとにコールバック関数（サブルーチン）を定義するもの。 こんな感じか。 use strict; use warnings; use LWP::Simple; use HTML::Parser; my $page = get('http://google.com/'); my $parser = HTML::Parser->new(api_version => 3, start_h => [\&start_tag, "tagname, attr, text"], end_h => [\&end_tag, "tagname"], text_h => [\&text, "dtext"] ); $parser->parse($page); $parser->eof; sub start
物事には順番というものがあります。 連続テレビドラマでもアニメでもコミックでも小説でもなんでもいいですが、いきなり最終回やエピローグを見せられても大抵なにがなんだかわからない。ごく単純なレベルから少しずつ複雑度が増していく過程を見ていたからこそついていける話もあるものです。 プログラミングの世界も似たようなもので、たとえばWeb関連の技術も、table タグもない状態からフレームだ JavaScript だ CSS だ Flash だ…と進んできた過程を見ているからこそ大まかにでも全体像が把握できている面は否定できず、いま１から理解するのは大変かもしれないなあ、と社内の新人さんを見ていると思います。 先日周囲で話題になっていたのは Perl での「use と requireの違い」。 まあこれも、大変大雑把に返答させてもらえば、 「use使っとけ」 の一言で済む話ではあります。Perl4の
何かツールがありそうだけど見つけられなかったので、WWW::Mechanizeを使って作ってみました。 編集中の記事をバックアップするのではなくて、「日記のエクスポート」を保存するスクリプトです。 #!/usr/bin/env perl use strict; use warnings; use POSIX qw{ strftime }; use WWW::Mechanize; MAIN:{ my $hatena_id = 'xxxxxxx'; my $password = 'xxxxxxx'; my $file_path = strftime( '/path/to/backup_dir/%Y%m%d-%H%M%S-diary.xml', localtime ); my $login_url = 'https://www.hatena.ne.jp/login'; my $export_ur
Perl › 基礎文法 ITの現場でPerlが必要になって、今勉強しているという方はおられませんか? 他の言語をある程度知っている方が「Perl基礎文法最速マスター」を読めば、Perlの使い方の基礎をマスターしてPerlを書くことができるようになっています。 基礎 文法チェック 文法をチェックを厳しくするために最初に必ず次の2行を書くようにします。 use strict; use warnings; 「use strict」と「use warnings」という2行を加えることで事前に文法チェックが行われるので、ソースコードを記述する作業は速くなり、コードの品質が上がります。 print関数 文字列を出力するにはprint関数を使用します。 print "Hello world"; Perlでは標準関数や事前に定義されている関数で括弧を省略することができます。 コメント Perlのコメントで
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
