new

Create a new object for a given Orace Trace file.

            

              
              
my $o_trc = Oracle::Trace->new($tracefile);
            
          

init

Initialise the object (check the tracefile).

            

              
              
$o_trc->init.
            
          

opentracefile

Perform basic exists/read/etc. checks on given tracefile.

Returns object or undef.

            

              
              
$o_trc = $o_trc->checkfile($tfile);  
            
          

header

Return the Header object.

            

              
              
my $o_hdr = $o_trc->header;
            
          

entries

Return Entry objects which comply with given regex criteria.

            

              
              
my @o_ents = $o_trc->entries('type'=>'EXEC #\d+', 'key'=>dep, 'value'=>0);
            
          

oids

Return the unique object ids for the currently known Entryies

            

              
              
my @oids = $o_trc->oids;
            
          

footer

Return the Footer object

            

              
              
my $o_ftr = $o_trc->footer;
            
          

test_report

Return a simple test_report of the current object.

            

              
              
print $o_trc->test_report('string');
            
          

mini_report

Return a simple string of descending order timings for the statements retrieved from the given objects.

            

              
              
my $s_str = $o_trc->mini_report($i_max, @o_objs);
            
          

Note that we use microsecond resolution for Oracle 9i and above and centisecond resolution otherwise

NAME

Oracle::Trace - Perl Module for parsing Oracle Trace files

SYNOPSIS

            

              
              
use Oracle::Trace;
print Oracle::Trace->new($tracefilename)->parse->test_report;
            
          

DESCRIPTION

Module for parsing and describing an Oracle Trace file.

Currently the parsing and statistics are very rudimentary, and in certain matters may be fundamentally flawed - you have been warned!

Expect this to improve as further development takes place.

EXPORT

None by default.

SEE ALSO

            

              
              
http://www.rfi.net/oracle/trace/
            
          

AUTHOR

Richard Foley, <oracle.trace@rfi.net>

COPYRIGHT AND LICENSE

Copyright (C) 2003 by Richard Foley

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.1 or, at your option, any later version of Perl 5 you may have available.