1Perl::Tags::Naive::Lib(U3s)er Contributed Perl DocumentatPieornl::Tags::Naive::Lib(3)
2
3
4
5   "get_parsers"
6       The following parsers are defined by this module.
7
8       "uselib_line"
9           Parse a use/require lib line Unshift libraries found onto @INC.
10
11       #package Perl::Tags::Tag::Recurse::Lib; # #our @ISA =
12       qw/Perl::Tags::Tag::Recurse/; # #=head1 "Perl::Tags::Tag::Recurse::Lib"
13       # #=head2 "type": dummy # #=head2 "on_register" # #Recurse adding this
14       new module accessible from a use lib statement to the queue.  # #=cut #
15       #package Perl::Tags::Tag::Recurse; # #sub on_register { #    my ($self,
16       $tags) = @_; # #    my $name = $self->{name}; #    my $path; #    my
17       @INC_ORIG = @INC; #    my @INC = #    eval { #        $path = locate(
18       $name ); # or warn "Couldn't find path for $module"; #    }; #    #
19       return if $@; #    return unless $path; #    $tags->queue( {
20       file=>$path, level=>$tags->{current}{level}+1 , refresh=>0} +); #
21       return; # don't get added #}
22
23       ##
24
25       1;
26

AUTHOR and LICENSE

28           dr bean - drbean at sign cpan a dot org
29           osfameron (2006) - osfameron@gmail.com
30
31       For support, try emailing me or grabbing me on irc #london.pm on
32       irc.perl.org
33
34       This was originally ripped off pltags.pl, as distributed with vim and
35       available from <http://www.mscha.com/mscha.html?pltags#tools> Version
36       2.3, 28 February 2002 Written by Michael Schaap <pltags@mscha.com>.
37
38       This is licensed under the same terms as Perl itself.  (Or as Vim if
39       you +prefer).
40
41
42
43perl v5.28.1                      2014-05-26         Perl::Tags::Naive::Lib(3)