にひりずむ::しんぷる - Data::Dumper と Data::Dump の実行速度の違い
Data::Dump はデフォルトでそれなりに整形して表示してくれるのと、コンテキストを見てよしなに処理を変えてくれるので、スクリプトのデバッグなどに使うのはまぁまぁ便利だったりします。 が、この子は PurePerl で実装されているので実行速度が結構遅いです。 どのくらい遅いかというと use strict; use warnings; use Benchmark qw(cmpthese :hireswallclock); use Data::Dump (); use Data::Dumper (); my $data = { foo => [qw/bar/], bar => { hoge => 'piyo', }, heavy => So::Heavy::Object->new(10), }; cmpthese -1, { 'Data::Dump' => sub { my $res
ishideoのブックマーク / 2008年12月22日 - はてなブックマーク
#coderepos で、「怪しい名前空間w」と言われてしまいましたが(^^;; Util系のモジュールがPerlにいくつかあって、便利なんだけど、紛らわしいというか、覚えてなくて、毎度調べるみたいなことがあります。 たとえば、List::UtilとList::MoreUtils。 「uniq関数どっちやったけ...?」 みたいな。そんな、わずらわしさを解消するために、Util::Any というものを作ってみました。 まとめるだけじゃ芸が無いので、まとめるモジュールを自作しやすいようにしてみました。 CPAN http://search.cpan.org/dist/Util-Any CodeRepos http://coderepos.org/share/browser/lang/perl/Util-Any/trunk/ 使い方は非常に簡単。 use Util::Any qw/list/;
UtilをまとめてしまうUtil::Any - Practice of Programming
#coderepos で、「怪しい名前空間w」と言われてしまいましたが(^^;; Util系のモジュールがPerlにいくつかあって、便利なんだけど、紛らわしいというか、覚えてなくて、毎度調べるみたいなことがあります。 たとえば、List::UtilとList::MoreUtils。 「uniq関数どっちやったけ...?」 みたいな。そんな、わずらわしさを解消するために、Util::Any というものを作ってみました。 まとめるだけじゃ芸が無いので、まとめるモジュールを自作しやすいようにしてみました。 CPAN http://search.cpan.org/dist/Util-Any CodeRepos http://coderepos.org/share/browser/lang/perl/Util-Any/trunk/ 使い方は非常に簡単。 use Util::Any qw/list/;
Data::Dumper で eval するメモ
Data::Dumper で eval するメモ 2006-10-24-2 [Programming] Cache::File[2006-10-17-1]でStorebla[2006-05-09-2]を使いたいのだが、 できそうもないので（何か良い方法があったら教えて下さい。 追記: ありました！→[2006-10-24-6]）、 Data::Dumper でシリアライズして読み書きすることにした。 サンプルプログラム： #!/usr/bin/perl use strict; use warnings; use Data::Dumper; $Data::Dumper::Terse = 1; $Data::Dumper::Indent = 0; my $foo = [ 0, [1,2,3], "hello", {one => 1, two => 2} ]; my $text = Dumper
TokuLog 改め最適なフレームワークで快適なくらしを創造する会 - Data::Visitor かっこいいね
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
[を] Data::Dumper で eval するメモ
Data::Dumper で eval するメモ 2006-10-24-2 [Programming] Cache::File[2006-10-17-1]でStorebla[2006-05-09-2]を使いたいのだが、 できそうもないので（何か良い方法があったら教えて下さい。 追記: ありました！→[2006-10-24-6]）、 Data::Dumper でシリアライズして読み書きすることにした。 サンプルプログラム： #!/usr/bin/perl use strict; use warnings; use Data::Dumper; $Data::Dumper::Terse = 1; $Data::Dumper::Indent = 0; my $foo = [ 0, [1,2,3], "hello", {one => 1, two => 2} ]; my $text =
Data::Dumper / Storable - しがない「げのまー」の・・・。
後輩に渡していた拙作のサブルーチンがどうしても途中で OutOfMemory してしまう。後輩から使用したデータを受け取り、サブルーチンに渡すデータセットに分断してテストしたら OutOfMemory はしない。が、確かに分断しないで行なうと OutOfMemory 。全データを数個のファイルに分割して計算させると OutOfMemory しない。 「データを適当に分割して掛けてくんない？」って言ったら「全体を見渡したいので、データは分割したくない。」との答え。こちらのサブルーチンも改造したくない。 # 問題となったサブルーチンではグローバルな変数・配列・ハッシュは全く使っていない。返ってくるのはネストしたハッシュへのリファレンス。 しかたないので、サブルーチンの出力結果を hash の構造を保持したままテキスト or DB 化する事にした。弱いなあ、俺。 my %hash = { hog
Storable v.s. Data::Dumper - Practice of Programming
Storableが速い。 Benchmark: timing 3000 iterations of code1, code2... code1: 0 wallclock secs ( 0.57 usr + 0.00 sys = 0.57 CPU) @ 5263.16/s (n=3000) code2: 2 wallclock secs ( 1.96 usr + 0.00 sys = 1.96 CPU) @ 1530.61/s (n=3000)コードはこんなの。 use Benchmark; use strict; use Storable; use Data::Dumper; $Data::Dumper::Purity = 1; $Data::Dumper::Terse = 1; $Data::Dumper::Indent = 0; $Data::Dumper::Pad = ''; my
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
azito.com
今日のCPANモジュール（跡地） 目次