Parent Directory | Revision Log | Patch
revision 44 by dpavlin, Mon Mar 23 09:22:30 2009 UTC | revision 59 by dpavlin, Wed Jun 17 16:49:17 2009 UTC | |
---|---|---|
# | Line 3 | Line 3 |
3 | use warnings; | use warnings; |
4 | use strict; | use strict; |
5 | ||
6 | use Test::More tests => 7; | use Test::More tests => 8; |
7 | use lib 'lib'; | use lib 'lib'; |
8 | use Data::Dump qw/dump/; | use Data::Dump qw/dump/; |
9 | ||
# | Line 25 is_deeply( [ sort keys %h ], [ 'bar', 'b | Line 25 is_deeply( [ sort keys %h ], [ 'bar', 'b |
25 | ||
26 | is_deeply( \%h, { bar => 1, baz => 99, foo => 42, }, 'structure' ); | is_deeply( \%h, { bar => 1, baz => 99, foo => 42, }, 'structure' ); |
27 | ||
28 | ok( my $mem = $o->info->{used_memory}, 'info' ); | |
29 | diag dump( \%h ); | diag "used memory $mem"; |
30 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |