PMFUNC(1p) User Contributed Perl Documentation PMFUNC(1p)NAME
pmfunc - cat out a function from a module
DESCRIPTION
Given a fully-qualified function, this program opens up the file and attempts to cat out the source for that function.
EXAMPLES
$ pmfunc Cwd::getcwd
sub getcwd
{
abs_path('.');
}
RESTRICTIONS
Only subroutines that are defined in the normal fashion are seen, since a simple pattern-match is what does the extraction. Those loaded
other ways, such as via AUTOLOAD, typeglob aliasing, or in an "eval", will all necessarily be missed.
This is mostly here for people who are too lazy to type
sed '/^sub getcwd/,/}/p' `pmpath Cwd`
or
perl -ne 'print if /^subs+getcwd/ .. /}/' `pmpath Cwd`
RESTRICTIONS SEE ALSO AUTHORS and COPYRIGHTS
Copyright (C) 1999 Tom Christiansen.
Copyright (C) 2006-2008 Mark Leighton Fisher.
This is free software; you can redistribute it and/or modify it under the terms of either: (a) the GNU General Public License as published
by the Free Software Foundation; either version 1, or (at your option) any later version, or (b) the Perl "Artistic License". (This is the
Perl 5 licensing scheme.)
Please note this is a change from the original pmtools-1.00 (still available on CPAN), as pmtools-1.00 were licensed only under the Perl
"Artistic License".
perl v5.10.1 2010-02-22 PMFUNC(1p)
Check Out this Related Man Page
FAQPODS(1p) User Contributed Perl Documentation FAQPODS(1p)NAME
faqpods - print out pod paths for the standard perl faqs
DESCRIPTION
This program uses your configuration's "installprivlib" directory to look up the full paths to those pod pages. Any files in that
directory whose names start in "perlfaq" will be printed to the standard output, one per line. This is normally used in backticks to
produce a list of filenames for other commands.
EXAMPLES
$ podgrep typeglob `faqpods`
....
You can also run this using alternate perl binaries, like so:
$ podgrep -i thread `filsperl faqpods`
....
SEE ALSO basepods(1), modpods(1), pods(1), sitepod(1), podpath(1), and stdpod(1).
AUTHORS and COPYRIGHTS
Copyright (C) 1999 Tom Christiansen.
Copyright (C) 2006-2008 Mark Leighton Fisher.
This is free software; you can redistribute it and/or modify it under the terms of either: (a) the GNU General Public License as published
by the Free Software Foundation; either version 1, or (at your option) any later version, or (b) the Perl "Artistic License". (This is the
Perl 5 licensing scheme.)
Please note this is a change from the original pmtools-1.00 (still available on CPAN), as pmtools-1.00 were licensed only under the Perl
"Artistic License".
perl v5.10.1 2010-02-22 FAQPODS(1p)
I am aware that Perl has a lot of features that originally came from sed and awk. I have a pattern that I am using like this:
sed -n '/|Y|/p'
I want to do the same thing in Perl and be able to either save that value in some kind of variable or array or potentially write it out to a file.
... (11 Replies)
Hi I have this code to print the current directory using Perl
use Cwd qw(abs_path);
my $path = abs_path($0);
print "$path\n";
But it is displaying my perl source code file along with the directory.
like this
C:\Perl\duration.pl
But I want it only to display this... (1 Reply)
# cat test
<abc>
</abc>
<abc>
</abc>
# sed 's/abc/checker/' test>test1
# cat test1
<checker>
</checker>
<checker>
</checker>
#
I want the first instance of abc to be changed to checker. But all(rest 3 also) are changed. I din't used global (g) option too..
What can be the... (5 Replies)
Greetings!
I've run into this before; and am having a spot of trouble trying to figure out the way that Perl would prefer the following example syntax to be formed:#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
`sed -i 's/Hi Mom!\|Hi Dad!/Bye Everyone!/I' ./test.txt`;Perl... (5 Replies)