Help for this page

Select Code to Download


  1. or download this
    s/\:000[A,P]M|99991231|Jan 1 1900 12:00:00//g;
  2. or download this
    my @input_field_indexes = map($_-1, @PROC_FIELDS);
  3. or download this
    for my $field (@INPUT_FIELDS[ @input_field_indexes ]) {
  $field = '' if $field =~ /SUN/;
}