package Perf::Trace::Context; use 5.010000; use strict; use warnings; require Exporter; our @ISA = qw(Exporter); our %EXPORT_TAGS = ( 'all' => [ qw( ) ] ); our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); our @EXPORT = qw( common_pc common_flags common_lock_depth ); our $VERSION = '0.01'; require XSLoader; XSLoader::load('Perf::Trace::Context', $VERSION); 1; __END__ =head1 NAME Perf::Trace::Context - Perl extension for accessing functions in perf. =head1 SYNOPSIS use Perf::Trace::Context; =head1 SEE ALSO Perf (script) documentation =head1 AUTHOR Tom Zanussi, E<lt>tzanussi@gmail.com<gt> =head1 COPYRIGHT AND LICENSE Copyright (C) 2009 by Tom Zanussi This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.0 or, at your option, any later version of Perl 5 you may have available. Alternatively, this software may be distributed under the terms of the GNU General Public License ("GPL") version 2 as published by the Free Software Foundation. =cut