1package Perf::Trace::Context; 2 3use 5.010000; 4use strict; 5use warnings; 6 7require Exporter; 8 9our @ISA = qw(Exporter); 10 11our %EXPORT_TAGS = ( 'all' => [ qw( 12) ] ); 13 14our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); 15 16our @EXPORT = qw( 17 common_pc common_flags common_lock_depth 18); 19 20our $VERSION = '0.01'; 21 22require XSLoader; 23XSLoader::load('Perf::Trace::Context', $VERSION); 24 251; 26__END__ 27=head1 NAME 28 29Perf::Trace::Context - Perl extension for accessing functions in perf. 30 31=head1 SYNOPSIS 32 33 use Perf::Trace::Context; 34 35=head1 SEE ALSO 36 37Perf (script) documentation 38 39=head1 AUTHOR 40 41Tom Zanussi, E<lt>tzanussi@gmail.com<gt> 42 43=head1 COPYRIGHT AND LICENSE 44 45Copyright (C) 2009 by Tom Zanussi 46 47This library is free software; you can redistribute it and/or modify 48it under the same terms as Perl itself, either Perl version 5.10.0 or, 49at your option, any later version of Perl 5 you may have available. 50 51Alternatively, this software may be distributed under the terms of the 52GNU General Public License ("GPL") version 2 as published by the Free 53Software Foundation. 54 55=cut 56