The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Perlbug::Fix - Command line interface to fixing perlbug database.

DESCRIPTION

Command line interface to fixing incorrect perlbug data.

Most calls take an integer as the maximimum number of records to process, or default to a relatively low value.

SYNOPSIS

        use Perlbug::Fix;

        my $o_fix = Perlbug::Fix->new();

        $o_fix->cmd; # loop

USAGE

        lowercase is indicator/report 
        
        UPPERcase expands/effects
        
        > h             # help [with args]
        
        > H             # Helpful help

        > k 125 # set Perlbug_Max (number of records to fix) to 125

        > s             # scan for correctable relationships

        > S 200108%     # implement corrections for August registered bugs

        >               # etc.

METHODS

new

Create new Perlbug::Fix object:

    my $o_fix = Perlbug::Fix->new();
kick

Kick Perlbug_Max value ...

process

Processes the command given, gets and truncates the results, calls scroll

This could be redundant ? -> Cmd::process()

references

Delete duff references in bug_\w+_\w+ tables by given arg

Or, if two args given appropriate relationship:

        r patch # bug->patch understood

        r patch version # patch->version
src_address

Correct db_SRC_table where SRC may be<bug>|group

change

Correct bug_patch, bug_change, bug_patch, patch_change tables via given file

Example file contents:

        ____________________________________________________________________________
        [  7012] By: nick                                  on 2000/09/02  17:25:20
                        Log: More %{} and other deref special casing - do not pass to 'nomethod'.
                 Branch: perl
                           ! gv.c lib/overload.pm    
        ____________________________________________________________________________
        [  7001] By: jhi                                   on 2000/09/01  23:00:13
                        Log: Subject: [PATCH: 6996] minimal removal of 8 bit chrs from perlebcdic.pod
                                 From: Peter Prymmer <pvhp@forte.com>
                                 Date: Fri, 1 Sep 2000 15:50:57 -0700 (PDT)
                                 Message-ID: <Pine.OSF.4.10.10009011542550.147696-100000@aspara.forte.com>

                                 plus rework the http: spots as suggested by Tom Christiansen,
                                 plus regen perltoc.
                 Branch: perl
                           ! README.os2 pod/perl56delta.pod pod/perlebcdic.pod
                           ! pod/perlguts.pod pod/perltoc.pod pod/perlxs.pod
        ____________________________________________________________________________  

        [  6921] By: jhi                                   on 2000/08/30  19:40:16
                        Log: Subject: [ID 20000830.036] [DOC] chom?p %hash not documented
                                 From: Rick Delaney <rick@consumercontact.com>
                                 Date: Wed, 30 Aug 2000 15:36:55 -0400 (EDT)
                                 Message-Id: <Pine.UW2.4.10.10008301535210.1949-100000@consumer>
                 Branch: perl
                           ! pod/perlfunc.pod
        ____________________________________________________________________________ 
message

Fix message subject lines where empty

header_body

Migrate headers and body from original bug

users

Correct users table, currently only looks for blank passwords

execute

Process action on behalf user

        my $i_ok = $self->execute('UPDATE x SET y WHERE z etc...');
ubl

Update db_user_bug from db_log by userid

forward

Assumes bugids in db, messages in dir, find messages which were not forwarded, forward them.

Not the same as an historic trawl, which is looking for new/replies, etc.

redundant

scan_bugs

Trawls and updates bug group, osname, versions etc.

trim_flags

Trim flags where duplicates

discard

Discard duplicate and otherwise redundant info

scan_ids

Trawls and updates bugs for msgid (email_msgid) Message-Id field

AUTHOR

Richard Foley perlbug@rfi.net 2000 2001