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