PFUNC(1p) User Contributed Perl Documentation PFUNC(1p)NAME
pfunc - grep for perl functions
SYNOPSIS
pfunc subroutine FILES...
DESCRIPTION
pfunc searches the named FILES for all calls to the given subroutine. It will report back the file and line number each call is found on
along with what sort of call it is
function foo()
class method Class->foo()
object method $obj->foo()
EXAMPLE
$ pfunc isa /usr/share/perl/5.6.1/*.pm
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 316
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 327
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 397
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 494
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 495
Called as object method in /usr/share/perl/5.6.1/CPAN.pm at line 4957
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 191
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 218
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 248
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 251
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 254
Called as object method in /usr/share/perl/5.6.1/Shell.pm at line 28
Called as object method in /usr/share/perl/5.6.1/base.pm at line 12
NOTES
Its not fast, but its accurate.
AUTHOR
Michael G Schwern <schwern@pobox.com>
SEE ALSO
Module::Info
perl v5.10.1 2010-10-03 PFUNC(1p)
Check Out this Related Man Page
HTTP::Server::Simple::CGI(3pm) User Contributed Perl Documentation HTTP::Server::Simple::CGI(3pm)NAME
HTTP::Server::Simple::CGI - CGI.pm-style version of HTTP::Server::Simple
DESCRIPTION
HTTP::Server::Simple was already simple, but some smart-ass pointed out that there is no CGI in HTTP, and so this module was born to
isolate the CGI.pm-related parts of this handler.
accept_hook
The accept_hook in this sub-class clears the environment to the start-up state.
post_setup_hook
Initializes the global CGI object, as well as other environment settings.
cgi_class [Classname]
Gets or sets the class to use for creating the $cgi object passed to "handle_request".
Called with a single argument, it sets the coderef. Called with no arguments, it returns this field's current value.
To provide an initialization subroutine to be run in the post_setup_hook, see "cgi_init".
e.g.
$server->cgi_class('CGI');
$server->cgi_init(sub {
require CGI;
CGI::initialize_globals();
});
or, if you want to use CGI::Simple,
$server->cgi_class('CGI::Simple');
$server->cgi_init(sub {
require CGI::Simple;
});
cgi_init [CODEREF]
A coderef to run in the post_setup_hook.
Called with a single argument, it sets the coderef. Called with no arguments, it returns this field's current value.
setup
This method sets up CGI environment variables based on various meta-headers, like the protocol, remote host name, request path, etc.
See the docs in HTTP::Server::Simple for more detail.
handle_request CGI
This routine is called whenever your server gets a request it can handle.
It's called with a CGI object that's been pre-initialized. You want to override this method in your subclass
handler
Handler implemented as part of HTTP::Server::Simple API
perl v5.10.1 2010-04-02 HTTP::Server::Simple::CGI(3pm)
Hi friends,
I am not sure if perl questions can be raised here. :rolleyes:
But I have a doubt if there is a way to do "#define" in perl, like in C.
Does anyone know if it is feasible (without CPAN modules)?
Thanks,
Srini (7 Replies)
Hello Experts,
I am newbie to perl, just curious to know how to do the following in perl.
suppose I ve a txt file like below. when it founds "*Main Start"
Then go to "*Main End,,,,,,,," patteren and just collect the number from the previous line of "*Main End,,,,,,," pattern . In my... (17 Replies)
Hi All,
As my old group friends knows, I know shell scripting but very new to perl scripting. Hence struggling now for the simple task. This should be done using perl. Any help for the below requirement would be greatful for me...
I've around 40 files, with the below layout:
file1.csv... (18 Replies)
Hi All, i want to have a ftp function in my perl but i am unfamailiar with the perl syntax. Can any body help ?
The ftp code below is in csh, can anybody help to convert this to perl with the same functionality ?
foreach t (10.10.10.10 20.20.20.20)
set USER = "xxx"
set PASS = "zzz"... (21 Replies)
Hi,
I am new to programming and also to perl..But i know 'perl' can come to my rescue, But I am stuck at many places and need help..any small help is much appreciated... below is the description of what i intend to acheive with my script.
I have a files named in this format... (13 Replies)
Hi Everyone,
#!/usr/bin/perl
$a = ".a!";
if ($a =~ s///g) {
print "invalid file name\n";
} else {
print "valid file name\n";
}
but the output is:
Invalid range "_-." in regex; marked by <-- HERE in m// at ./a.pl line 5.
the linux file name should be A-Z, a-z,... (8 Replies)
Please help to sort columns in this file:
a b d f c e
1 4 10 16 7 13
2 5 11 17 8 14
3 6 12 18 9 15
I need to sort COLUMNS (so sort command doesn't work) like this:
a b c d e f
1 4 7 10 13 16
2 5 8 11 14 17
3 6 9 12 15 18
I know sed can do it but don't know how... :( (7 Replies)
hi i have some perl scripts with shebang line as (#! /usr/bin/env perl ) instead of actual absolute path of perl ( i know why its that way ) everything works fine from command line , the problem is when i am trying to run those scripts from web ( local web tool ) it throws error as /usr/bin/env :... (6 Replies)
Hi all,
I'm looking for the line number where the string "total" appears.
I know that this is after a given line number which I know.
So I would like to know the line number of the first "total" after the line X.
Is it possible to use grep a file from a given line only?
Thank you, (7 Replies)
I am trying to add a condition to the below perl that will capture the GTtag and place a specific string in the last field of each line. The problem is that the GT value used is not right after the tag rather it is a few fields away. The values should always be 0/1 or 1/2 and are in bold in the... (12 Replies)
In the perl one-liner below I am identifying the runs of 6a or 6A in each line starting with >. The code seems close but it prints each > line no matter if it has 6a or 6A in it. Only the line with the 6a or 6A needs to be printed.
So using the input file, only the >hg19_refGene_NM_001918_3... (10 Replies)