56 lines · plain
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_depth18);19 20our $VERSION = '0.01';21 22require XSLoader;23XSLoader::load('Perf::Trace::Context', $VERSION);24 251;26__END__27=head1 NAME28 29Perf::Trace::Context - Perl extension for accessing functions in perf.30 31=head1 SYNOPSIS32 33 use Perf::Trace::Context;34 35=head1 SEE ALSO36 37Perf (script) documentation38 39=head1 AUTHOR40 41Tom Zanussi, E<lt>tzanussi@gmail.com<gt>42 43=head1 COPYRIGHT AND LICENSE44 45Copyright (C) 2009 by Tom Zanussi46 47This library is free software; you can redistribute it and/or modify48it 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 the52GNU General Public License ("GPL") version 2 as published by the Free53Software Foundation.54 55=cut56