Perl::Tags::Naive::Lib.3pm

Langue: en

Version: 2009-11-12 (fedora - 01/12/10)

Section: 3 (Bibliothèques de fonctions)

Sommaire

get_parsers

The following parsers are defined by this module.
uselib_line
Parse a use/require lib line Unshift libraries found onto @INC.

#package Perl::Tags::Tag::Recurse::Lib; # #our @ISA = qw/Perl::Tags::Tag::Recurse/; # #=head1 "Perl::Tags::Tag::Recurse::Lib" # #=head2 "type": dummy # #=head2 "on_register" # #Recurse adding this new module accessible from a use lib statement to the queue. # #=cut # #package Perl::Tags::Tag::Recurse; # #sub on_register { # my ($self, $tags) = @_; # # my $name = $self->{name}; # my $path; # my @INC_ORIG = @INC; # my @INC = # eval { # $path = locate( $name ); # or warn ``Couldn't find path for $module''; # }; # # return if $@; # return unless $path; # $tags->queue( { file=>$path, level=>$tags->{current}{level}+1 , refresh=>0} +); # return; # don't get added #}

##

1;

AUTHOR and LICENSE

     dr bean - drbean at sign cpan a dot org
     osfameron (2006) - osfameron@gmail.com

For support, try emailing me or grabbing me on irc #london.pm on irc.perl.org

This was originally ripped off pltags.pl, as distributed with vim and available from <http://www.mscha.com/mscha.html?pltags#tools> Version 2.3, 28 February 2002 Written by Michael Schaap <pltags@mscha.com>.

This is licensed under the same terms as Perl itself. (Or as Vim if you +prefer).