Perf/Trace/Context.pm

0001 package Perf::Trace::Context;
0002
0003 use 5.010000;
0004 use strict;
0005 use warnings;
0006
0007 require Exporter;
0008
0009 our @ISA = qw(Exporter);
0010
0011 our %EXPORT_TAGS = ( 'all' => [ qw(
0012 ) ] );
0013
0014 our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
0015
0016 our @EXPORT = qw(
0017     common_pc common_flags common_lock_depth
0018 );
0019
0020 our $VERSION = '0.01';
0021
0022 require XSLoader;
0023 XSLoader::load('Perf::Trace::Context', $VERSION);
0024
0025 1;
0026 __END__
0027 =head1 NAME
0028
0029 Perf::Trace::Context - Perl extension for accessing functions in perf.
0030
0031 =head1 SYNOPSIS
0032
0033   use Perf::Trace::Context;
0034
0035 =head1 SEE ALSO
0036
0037 Perf (script) documentation
0038
0039 =head1 AUTHOR
0040
0041 Tom Zanussi, E<lt>tzanussi@gmail.com<gt>
0042
0043 =head1 COPYRIGHT AND LICENSE
0044
0045 Copyright (C) 2009 by Tom Zanussi
0046
0047 This library is free software; you can redistribute it and/or modify
0048 it under the same terms as Perl itself, either Perl version 5.10.0 or,
0049 at your option, any later version of Perl 5 you may have available.
0050
0051 Alternatively, this software may be distributed under the terms of the
0052 GNU General Public License ("GPL") version 2 as published by the Free
0053 Software Foundation.
0054
0055 =cut