七行プログラミング (452ﾚｽ)
上下前次1-新

---

259(1): 04/02/27 23:21 ID:aqbVKltF(1)調 AA×


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
259: [] 04/02/27 23:21 ID:aqbVKltF 無造作に縮めてみる。 package Store7;@ISA=Exporter;@EXPORT=@EXPORT_OK=qw/store retrieve/;use Exporter ;sub E{$_=pop;s/(\\|')/\\$1/g;$_}sub d{my$e=ref(my$f=pop);$e eq 'SCALAR'?"'".E$ $f."'":$e eq 'ARRAY'?'['.join(',',map{d$_}@$f).']':$e eq 'HASH'?'{'.join(',', map{"'".E($_)."'=>".d($f->{$_})}keys%$f).'}':"'".E($f)."'"}sub store{open my$o, ">$_[1]";print$o d($_[0])}sub retrieve{do$_[0]} http://medaka.5ch.net/test/read.cgi/php/1036141603/259
無造作に縮めてみる

---

上下前次1-新書関写板覧索設栞歴

---

あと 193 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.031s