count wall tm cpu time line 0 0.00000 0.00000 1:#! perl -slw 0 0.00000 0.00000 2:use strict; 0 0.00000 0.00000 3:use Time::HiRes qw[ time ]; 0 0.00000 0.00000 4: 0 0.00000 0.00000 5:sub aaa { 5003 4.90137 0.00000 6: Win32::Sleep( 1 ); 0 0.00000 0.00000 7:} 0 0.00000 0.00000 8: 0 0.00000 0.00000 9:sub bbb { 500 4.98694 0.00000 10: Win32::Sleep( 10 ); 0 0.00000 0.00000 11:} 0 0.00000 0.00000 12: 0 0.00000 0.00000 13:sub ccc { 50 4.99772 0.00000 14: Win32::Sleep( 100 ); 0 0.00000 0.00000 15:} 0 0.00000 0.00000 16: 0 0.00000 0.00000 17:sub ddd { 5 4.99970 0.00000 18: Win32::Sleep( 1000 ); 0 0.00000 0.00000 19:} 0 0.00000 0.00000 20: 0 0.00000 0.00000 21:sub eee { 10 0.00002 0.00000 22: aaa() for 1 .. 1000; 10 0.00001 0.00000 23: bbb() for 1 .. 100; 10 0.00002 0.00000 24: ccc() for 1 .. 10; 10 0.00002 0.00000 25: ddd() for 1 .. 1; 0 0.00000 0.00000 26:} 0 0.00000 0.00000 27: 2 0.00000 0.00000 28:eee() for 1 .. 5; 0 0.00000 0.00000 29: # Profile data generated by Devel::NYTProf::Reader # Version: v2.08 # More information at http://search.cpan.org/dist/Devel-NYTProf/ # Format: time,calls,time/call,code 0.003000 1 0.003000 #! perl -slw 0.002000 3 0.000667 use strict; 0.003000 3 0.001000 use Time::HiRes qw[ time ]; 0.000000 0 0.000000 0.000000 0 0.000000 sub aaa { 5.010000 5003 0.001001 Win32::Sleep( 1 ); 0.000000 0 0.000000 } 0.000000 0 0.000000 0.000000 0 0.000000 sub bbb { 5.000000 500 0.010000 Win32::Sleep( 10 ); 0.000000 0 0.000000 } 0.000000 0 0.000000 0.000000 0 0.000000 sub ccc { 5.000000 50 0.100000 Win32::Sleep( 100 ); 0.000000 0 0.000000 } 0.000000 0 0.000000 0.000000 0 0.000000 sub ddd { 5.000000 5 1.000000 Win32::Sleep( 1000 ); 0.000000 0 0.000000 } 0.000000 0 0.000000 0.000000 0 0.000000 sub eee { 0.000000 10 0.000000 aaa() for 1 .. 1000; 0.000000 10 0.000000 bbb() for 1 .. 100; 0.000000 10 0.000000 ccc() for 1 .. 10; 0.000000 10 0.000000 ddd() for 1 .. 1; 0.000000 0 0.000000 } 0.000000 0 0.000000 0.000000 2 0.000000 eee() for 1 .. 5; 0.000000 0 0.000000