Help for this page

Select Code to Download


  1. or download this
    m/^ENG$/i;
m/^AVN$/i;
m/^TRAN$/i
...etc
  2. or download this
    my %matches = (
  ENG      => 'EN',
  AVN      => 'AV',
...
} else {
  $row[3] = 'PU';
}