2 # run with perl -d:DProf $0
4 use CGI::Ex::Conf qw(conf_read conf_write);
6 use Data::Dumper qw(Dumper);
8 #my $cob = CGI::Ex::Conf->new;
9 my $tmp = tmpnam .".sto";
25 #$cob->write($tmp, $conf);
26 conf_write($tmp, $conf);
27 #print `cat $tmp`; exit;
30 # my $ref = $cob->read($tmp);
31 # my $ref = conf_read($tmp);
32 # print Dumper $ref; exit;
34 conf_write($tmp, $conf);
41 %Time ExclSec CumulS #Calls sec/call Csec/c Name
42 38.5 2.120 0.000 100000 0.0000 0.0000 Storable::_retrieve
43 38.1 2.100 2.100 100000 0.0000 0.0000 Storable::pretrieve
44 20.9 1.150 5.860 100000 0.0000 0.0001 CGI::Ex::Conf::read_ref
45 8.73 0.480 6.720 100000 0.0000 0.0001 CGI::Ex::Conf::conf_read
46 6.91 0.380 0.380 100001 0.0000 0.0000 CGI::Ex::Conf::new
47 4.73 0.260 0.000 100000 0.0000 0.0000 Storable::retrieve
48 4.18 0.230 4.710 100000 0.0000 0.0000 CGI::Ex::Conf::read_handler_storab
50 0.36 0.020 0.040 3 0.0067 0.0133 main::BEGIN
51 0.18 0.010 0.010 6 0.0017 0.0017 Exporter::import
52 0.18 0.010 0.010 4 0.0025 0.0025 CGI::Ex::Conf::BEGIN
53 0.18 0.010 0.020 1 0.0100 0.0199 CGI::Ex::Conf::write_handler_stora
55 0.18 0.010 0.010 5 0.0020 0.0020 AutoLoader::AUTOLOAD
56 0.00 0.000 0.000 1 0.0000 0.0000 POSIX::load_imports
57 0.00 0.000 0.000 1 0.0000 0.0000 Exporter::Heavy::heavy_export
58 0.00 0.000 0.000 1 0.0000 0.0000 Storable::store
61 %Time ExclSec CumulS #Calls sec/call Csec/c Name
62 60.3 9.510 9.510 100001 0.0001 0.0001 Storable::pstore
63 32.8 5.170 0.000 100001 0.0001 0.0000 Storable::_store
64 7.68 1.210 16.450 100001 0.0000 0.0002 CGI::Ex::Conf::write_ref
65 2.60 0.410 17.220 100001 0.0000 0.0002 CGI::Ex::Conf::conf_write
66 2.28 0.360 0.360 100001 0.0000 0.0000 CGI::Ex::Conf::new
67 2.16 0.340 15.240 100001 0.0000 0.0002 CGI::Ex::Conf::write_handler_stora
69 1.33 0.210 0.000 100001 0.0000 0.0000 Storable::store
70 0.06 0.010 0.010 3 0.0033 0.0033 AutoLoader::import
71 0.06 0.010 0.010 2 0.0050 0.0050 DynaLoader::BEGIN
72 0.06 0.010 0.010 4 0.0025 0.0025 CGI::Ex::Conf::BEGIN
73 0.06 0.010 0.030 3 0.0033 0.0099 main::BEGIN
74 0.00 0.000 0.000 1 0.0000 0.0000 POSIX::load_imports
75 0.00 0.000 0.000 1 0.0000 0.0000 Exporter::Heavy::heavy_export
76 0.00 - -0.000 1 - - main::END
77 0.00 - -0.000 1 - - bytes::import