Changeset 478


Ignore:
Timestamp:
Mar 14, 2007, 10:29:38 AM (13 years ago)
Author:
Dominic Hargreaves
Message:

Add ignore function

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/npemap.org.uk/scripts/process-problems

    r368 r478  
    7676    chomp $input;
    7777    if ($probids{$input}) {
    78         print "d for delete or comma separated postcode to update: ";
     78        print "d for delete, i to ignore, comma separated postcode to update: ";
    7979        my $input2 = <STDIN>;
    8080        chomp $input2;
    8181        if ($input2 =~ /^d$/i) {
    8282            $delsth->execute($input) or warn $dbh->errstr;
     83        } elsif ($input2 =~ /^i$/i) {
     84            # Nothing. We'll mark it as actioned below
    8385        } elsif ($input2 =~ /(\w*),(\w*)/) {
    8486            $updsth->execute($1, $2, $input) or warn $dbh->errstr;
Note: See TracChangeset for help on using the changeset viewer.