Opened by mr-sansibar at 2007-09-08 17:04
ptk+2007-09-09 23:03:52--Devel::Cover sagt dir das.
Du könntest aber auch den Debugger verwenden und in der Schleife einen Breakpoint setzen.
dieses modul habe ich ja auch zuvor benutzt !
und dabei würde diese datei angelegt, kann damit nicht anfagen.
datei inhalt:
Code: (dl
)
1
2
3
%data = ('files' => {'\\H:\\logfile_parser_by_application_unpack1.pl' => {'totallines' => '130','subs' => {'main::BEGIN' => {'dbinfo' => 'logfile_parser_by_application_unpack1.pl:14-14','hits' => 0}},'modtime' => 1187772366,'lines' => [undef,undef,undef,undef,undef,undef,undef,undef,undef,undef,3,3,3,undef,4,1,undef,1,1,undef,undef,undef,undef,1,1,1,1,1,1,1,undef,1,2,2,undef,undef,1,undef,undef,undef,undef,undef,1,undef,undef,undef,undef,undef,undef,undef,undef,undef,undef,undef,1,3,3,3,undef,3,1576,474,474,474,474,71,51,undef,undef,20,undef,undef,undef,1576,622,undef,219,219,undef,71,71,71,51,51,51,51,53,53,53,53,undef,51,51,undef,undef,undef,20,20,20,20,22,22,22,22,undef,20,20,undef,undef,71,71,undef,undef,148,148,148,undef,undef,undef,undef,3,undef,undef,1,1,undef,1,1,1,undef,undef]},'\\C:\\Perl\\lib\\Time\\HiRes.pm' => {'totallines' => '77','subs' => {'Time::HiRes::__ANON__[C:/Perl/lib/Time/HiRes.pm:41]' => {'dbinfo' => 'C:/Perl/lib/Time/HiRes.pm:41-41','hits' => 0},'Time::HiRes::BEGIN' => {'dbinfo' => 'C:/Perl/lib/Time/HiRes.pm:40-40','hits' => 0},'Time::HiRes::AUTOLOAD' => {'dbinfo' => 'C:/Perl/lib/Time/HiRes.pm:28-44','hits' => 0},'Time::HiRes::import' => {'dbinfo' => 'C:/Perl/lib/Time/HiRes.pm:46-61','hits' => 0},'Time::HiRes::tv_interval' => {'dbinfo' => 'C:/Perl/lib/Time/HiRes.pm:67-72','hits' => 0}},'modtime' => 1136262420,'lines' => [
.