トップ «前の日記(■2004-07-25) 最新 次の日記(■2004-07-31)» 編集

どんぞこ日誌

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|

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


■2004-07-28

* [Perl] オブジェクトの共有B!

  久しぶりにithreadsメモを更新。Perlのblessは共有リファレンスに対して効きません。かといって、blessされたリファレンス(オブジェクト)をshareしても、確かに共有化はされますが、何か操作をしようとすると大概うまく動きません(例:'Invalid value for shared scalar')。これは結構不便です。そこでObject::Sharableをつくってみました。

 # Perl5.8.1以上、Storable 2.11以上
 use Object::Sharable;
 use CGI;
 
 my $cgi = new CGI;
 share_obj($cgi);          # 共有化!
 
 $cgi->param('foo','hoge');
 
 threads->new(\&test,$cgi)->join;
 
 print $cgi->param('foo'); # 出力は'ok'
 # share_objしないと値は'hoge'のまま
 
 sub test{ shift->param('foo','ok'); }

  元のオブジェクトをStorableでシリアル化してクラス内に保存(残念ながらGLOB型はシリアライズできません!)。メソッドが呼び出されるとオブジェクトを戻してAUTOLOADでオリジナルのメソッドを呼び出します。このあと再度オブジェクトをシリアル化することでオブジェクトの状態を更新します。そのため直接$obj->{val} = 1とかやっても他のスレッドに伝わりません。オーバーロードしたオブジェクトに対応するようにObject::Sharable::Overloadも用意してあります。あと、DESTROYが複数回呼び出されないように小細工を。まあ、ほとんど役に立たない実験モジュールですのであしからず。

* [雑感] さくらインターネットの新サービスB!

 このサイトは、さくらインターネットを利用しているのですが、最近新しいサービスが始まりまして、乗換えキャンペーンをやっています。で、無料のお試しをしてみたのですが、充実していました。現状のサーバではperl5.00503とruby1.81が使えたのですが、さらにPerl5.8.4、php、pythonが使えて、MySQLも利用できるようです(この辺はサービスプランによります)。
  どうもこの新しいサービスは、日記やblogをターゲットにしているみたいで、最初から設定でtDiaryがインストールできるようになっていたり、PerlモジュールではGDやCrypt::DSA、Crypt::Rnadom(当然Math::Pariも!)、さらにXML::LibXMLなど、Movable Typeなどのblogツール用に適したものが結構インストールされています。pureperl版をつくった苦労は……
  あと最近知ったのですが、今使っているサーバでもsshやcronが利用できたんですね(新しいサービスでは正式に対応しているみたい)。

本日のツッコミ(全2件) [ツッコミを入れる]
_ SEO (■2008-04-08 18:15)

ネォ、ニ、ホ・ヲ・ァ・ラ・オ・、・ネ、ピm、ケ、屮紮奸▲諭▲、ニ。「クヒノ譽癲Ε譽`・ク、ヒミミ、ッ、ネ。「ヤL・讖`・カゥ`SEM、ホチ払楕は50イ留搬覆ヌ徘ノル、キ、ト、ト、「、Aマ鬚あります、つまんハヒィ・Д・Ε枸魅Yケ茱曄廛◆Ε譽`・クトソ<a href=http://www.seozone.jp>SEO</a>、魎_弼、ケ、ъ`・カゥ`、ャ」ア」ー」ーネヒ、ヒ、ケ、Ε漾「」イ・レゥ`・ク<a href=http://www.seozone.jp>SEO拳イ゜</a>トソ、ホ・讖`・カゥ`、マ」オ」ーネヒ、鯤Г錣譟厚に3ペ`・クトソ、ヒミミ、ッ、ネ。「」イ」オ、ホ驥モEユ゜、ヒ、キ、ォイミ、オ、Ε法◆◆▲蓮◆◆▲Α▲諭▲辧▲蓮♯Α、ケ。」

_ うつ押 (■2008-04-18 15:03)

ヒス、マ、ウ、ホ杉トァ、ホ、隍ヲ、ハ、ヲ、トイ。、ネ<a href=http://www.sayonara-utsu.com>、ヲ、トイ。</a>20トgソ瑕L、キ、゛、キ、ソ。」、マ、ク、皃ホ10ト熙マメサネヒ、ヌ。「、ス、キ、ニ、筅ヲ10ト熙マ、「、Д痢Ε叩Ε愁`、ネケイ、ヒ、ヲ、トイ。、ヒチ「、チマΕ、テ、ソ、ネムヤ、テ、ニ、、、、、ヌ、キ、遉ヲ。」、ス、Ε沺◆屐◆、熙ヒ餃、ッ。「ミチ、、、ヲ、トイ。、ヲ、トイ。ヨホッ洟ホスU鰊でした。

[]