NAME
Perlbug::Interface::Cmd - Command line interface to perlbug database.
DESCRIPTION
Command line interface to perlbug database.
SYNOPSIS
use Perlbug::Interface::Cmd;
my $o_perlbug = Perlbug::Interface::Cmd->new;
my $result = $o_perlbug->cmd;
print $result; # == 1 (hopefully :-)
METHODS
- new
-
Create new Perlbug::Interface::Cmd object:
my $pb = Perlbug::Interface::Cmd->new();
- opt
-
Command line arguments (if any) supplied to script
print "verbose requested\n" if $o_cmd->opt('v');
- cmd
-
Call the command line interface:
$o_perlbug->cmd;
- process
-
Processes the command given, gets and truncates the results, calls scroll
- scroll
-
Scroll the available data if necessary.
- history
-
History mechanism accessor
- spec
-
Return specification
- doh
-
Wraps and extends help message
- doH
-
History of commands
- parse_commands
-
Parses the subject and body of the email message into a command hash, hash is placed in $pb->result, returns ref to said hash:
my $h_ref = $pb->parse_commands($sbj, $bdy);
- process_commands
-
Steps through hash created by parse_commands, and executes each outstanding command, so long as the command has been allowed via switches. Returns valid == 1 or error message.
my @outcome = $pb->process_commands($ref_to_hashed_commands);
- scan
-
Scan for perl relevant data putting found or default switches in $h_data. Looking for both group=docs and '\brunning\s*under\ssome\s*perl' style markers.
my $h_data = $o_mail->scan($body);
- messageid_recognised
-
Returns obj and ids for any given email Message-Id line
my ($obj, $ids) = $self->messageid_recognised($messageid_line);
AUTHOR
Richard Foley perlbug@rfi.net 2000 2001