Richard Foley > Oracle-Trace-1.08 > Oracle::Trace

Download:
Oracle-Trace-1.08.tar.gz

Dependencies

Annotate this POD

CPAN RT

New  1
Open  0
View/Report Bugs
Module Version: 1.08   Source  
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.

syntax highlighting: