Just another perl hacker somewhere near Disneyland
I have this homenode [perlmonks.org] of little consequence on Perl Monks [perlmonks.org] that you probably have no interest in whatsoever.
I also have some modules [cpan.org] on CPAN [cpan.org] some of which are marginally [cpan.org] more [cpan.org] useful [cpan.org] than others.
if (my $status = s/^\s*LIBFILES\s*=//
.. !s/\\$//) {
push @libs, split;
last if $status =~/E0/;
}
I had to add comments (to the effect of "From the start of the LIBFILES section to the first line which doesn't end in a backslash) and explain the flip-flop operator for the benefit of the (novice but only) other perl programmer in the office.
YAILPB(YetAnotherILikePerlBecause) 0 Comments More | Login | Reply /