トップ «前の日記(■2009-09-30) 最新 次の日記(■2009-12-01)» 編集

どんぞこ日誌

2003|08|09|10|11|12|
2004|01|02|03|04|05|06|07|08|09|10|11|12|
2005|01|02|03|04|05|06|07|08|09|10|11|12|
2006|01|02|03|04|05|07|08|12|
2007|01|04|08|12|
2008|01|02|03|04|06|07|08|10|11|12|
2009|01|02|04|05|06|07|08|09|11|12|
2010|01|03|04|07|08|10|11|12|
2011|01|02|03|04|05|06|07|08|10|12|
2012|01|02|03|05|06|07|08|09|10|
2013|01|02|07|08|09|
2014|08|09|
2015|08|
2016|06|07|12|
2017|01|03|08|
2018|03|
2022|03|

同人関連(どんぞこ楽屋) | 旧い雑文   


■2009-11-21

* [Perl] Perl Casual Talks#1に参加しましたB!

 Perl Casual Talksに行ってきました。どの方のお話も面白くとても楽しかったです。皆様お疲れ様でした&ありがとうございます。今後は一層「より積極的」になることを目指します。
 私もPerl同人誌の話をしましたが、時間切れで残り半分出来ませんでしたので、ここでちょっと吐き出しておきます。

冬コミの同人誌:『逆引きAcme大全』
12月31日(木)西よ-29b

内容の抜粋(仮)

  • use strictしてないファイルを削除したい
  • ↑のようなことをするAcmeモジュールを削除したい
  • 悪いお手本を反面教師にしたい
  • useしてもモジュールを利用できなくしたい
  • Perlがインストールされているかどうか知りたい
  • コメントをモールス信号にしたい
  • Coroでスレッドが切り替わったら「うわぁ…べんぞうさんの中…すごくあったかいナリぃ… 」と表示させたい

例えばこういう時に役に立つ!
Canvasで遊ぶのソースコード。これをPerlでもやってみたいと思い立ったとき。すなわち「Perlコードのコメント行に全然関係ない文章を入れたい」。→『逆引き』で「コードのコメント行をモールス信号にしたい」発見!
 →Acme::MorseComments←コレ。 あとはこのモジュールを参考にしてつくるだけ。(ここでコメント行とは#で始まるやつだけでpodセクションは含めません。)

結果:Acme::CommentChanger

 package YourModule;
 use strict;
 use base qw( Acme::CommentChanger );
 
 sub handler_token {
     return sub {
         my ( $self, $token ) = @_;
         # $token is PPI::Token::Comment
         my $content = $token->content;
     
         #
         # ....
         #
     
         $token->set_content( $content );
     }
 }
 
 #
 package main;
 
 my $changer = YourModule->new;
 my $code    = 'your source code';
 
 my $changed_code = $changer->change_code( $code );

PPI::Token::Commentを受け取るサブルーチンを返すハンドラを用意するだけで簡単にコメントを弄れます。Acme::MorseCommentsからは遠くに行ってしまったというか、汎用性高めただけですが……
  Acme::CommentTellerを同梱していて、こちらはコメント行を任意のテキストに置き換えます。eg下にcomment2storyというのがあるので

comment2story sourcefile  anotherfile > output

とやると、コメント行をいい感じでanotherfileの内容に置き換えてくれるかもしれません。
  あと、Acme::BleachCommentも同梱していて、こちらはAcme::Bleachのリスペクト。useして実行するとコメント行を全て取り除いてくれるが、プログラムは以前と変わらず動く……あたりまえだ。

で、Acmeモジュールについていうと

  • モジュール名(とDESCRIPTION)をみて楽しむ
  • 実行して喜ぶ(本当にやると危険なのもある!)
  • ソースを見て驚く(たまにトリッキーなのや勉強になるものが)
  • 自分もAcmeってみる(←こういう所から始めるのも楽し)

な感じで、結構Perl好きになるきっかけのひとつっぽくて良いなあとか、自分がPerl同人誌をつくるのは

  • 笑ってもらいたい
  • 手にとって触れる形にしたい
  • リアルで手渡したい

などですよーとか、

あと刺身☆ブーメランさんがここで書かれてるように、perl-casual.orgやperl-mongers.orgなどのコミュニティを一種のPerl同人と捉えるのは、素敵だなあと思ったりしたことを話そうとしたのですが、こりゃ詰め込みすぎ。

最後にperl-casualを立ち上げたyusukebeさんに感謝。

本日のツッコミ(全3件) [ツッコミを入れる]
_ MIT (■2009-11-30 09:44)

はじめまして、コメント失礼します。 <br>こちらの旧サイトで配布なさっているWSPのことなのですが、もう質問などは受け付けておられないのでしょうか? <br>BBSのほうは稼動してないようでしたし、近日の日記のあるブログでしたのでよろしければ、と。 <br>文字コードのことで少し伺いたいことがあるのですが…。

_ まかまか (■2009-12-02 15:12)

お返事遅れてすいません。 <br>確かに放置状態ではありますが、対応できる範囲でお答えします。 <br>長文になるようでしたらgmail.comに送って下さい。アカウントはmakamaka.donzokoです。 <br>ただ今週ちょっと忙しいので、お返事遅れるかもしれません。

_ MIT (■2009-12-03 07:17)

お返事ありがとうございます! <br>お忙しい中そう言っていただけてありがたいです。もちろん待たせていただきますのでお願いします。 <br>ではメールで送らせていただきます、よろしくお願いします。

本日のTrackBacks(全12件) []
_ Generic viagra.:Ship free viagra sample. (■2010-05-14 00:50)

Free viagra sample.

_ Percocet 93-490 10 mg.:Effects of long term percocet use. (■2010-05-15 21:31)

Percocet. Effects of long term percocet use. M360 percocet.

_ Percocet dosages.:Percocet picture. (■2010-11-26 08:45)

Percocet withdrawal. Symtoms of withdrawl from percocet. Percocet high blood pressure. Percocet. Bioavailability of percocet. Percocet 93-490 10 mg. Canadian prescritions and percocet. Pictures of percocet.

_ Animal sex tubes.:Animal sex tubes. (■2011-08-27 14:58)

Animal sex tubes.

_ Gay sex.:Gay sex. (■2011-09-21 09:44)

Gay sex.

_ Tramadol ultram.:Ultram. (■2011-09-21 18:44)

What is tramadol ultram. Buy ultram. Is ultram a narcotic. Ultram.

_ People having sex with animals.:Men having sex with animals. (■2011-09-22 09:40)

Males having sex with animals. Girls having sex with animals. Women having sex with animals. Human sex with animals.

_ Exclusive sex.:Exclusive sex. (■2011-09-22 17:40)

Exclusive sex.

_ Cheap airfare.:Cheap airfare tickets. (■2011-09-23 07:02)

Cheap airfare. Cheap air flights travel airfare.

_ Anal sex.:Anal sex. (■2011-09-23 09:29)

Free anal sex. Gay anal sex. Anal sex. Free anal sex clips. Male anal sex.

_ Free blowjob videos.:Free blowjob movies. (■2011-09-23 17:35)

Paris hilton blowjob. Free blowjob videos. Free blowjob movies. Free blowjob clips.

_ Diazepam.:Diazepam. (■2011-09-24 06:38)

Diazepam.