#!/usr/bin/env perl
use strict; use warnings;
use 5.14.1;
use App::Rad qw/+App::TeXMine/;
App::Rad->run();

sub img
:Help(extract all image paths used in \includegraphics or \pgfimage){
	my $c = shift;
	return $c->img_cmd;
}

sub url
:Help(extract all URLs inside \url{} commands){
 	my $c = shift;
	return $c->url_cmd;
}

sub bib
:Help(extract all cited BibTeX keys){
	my $c = shift;
	return $c->bib_cmd;
}

sub index
:Help(extract table of contents){
	my $c = shift;
	return $c->index_cmd;
}


# ABSTRACT: extract information from LaTeX files
# PODNAME: texmine


__END__
=pod

=head1 NAME

texmine - extract information from LaTeX files

=head1 VERSION

version 0.01_15

=head1 SYNOPSIS

texmine [command] file.tex

Run C<texmine help> for more options.

=head1 NAME

texmine - extract information from LaTeX files

=head1 COMMANDS

=over 4

=item B<index>

Extract the table of contents (generated from the \chapter,\section
and \subsection commands found).

=item B<url>

Extract all the URLs mentioned (generated from the \url commands
found).

=item B<bib>

Extract all the citations used (generated from the \cite commands
found).

=item B<img>

Extract all the image references found (generated from the 
\pgfimage and \includegraphics commands found).

=back

=head1 OPTIONS

=over 4

=item B<-a>

Process whole document (default is to ignore everything after '\end{document}').

=item B<-s>

Sort lines of output (not applicable to 'index' command).

=item B<-c>

Suppress normal output; instead print a count of the output lines
(not applicable to 'index' command).

=back

=head1 SEE ALSO

L<App::TeXMine>

=head1 COPYRIGHT

Copyright 2012 Andre Santos.

=head1 AUTHOR

Andre Santos

=head1 AUTHOR

Andre Santos <andrefs@cpan.org>

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2012 by Andre Santos.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut