Select Code to Download

    my @tokens = split /\t+/;  # split on one or more consecutive tabs

    elsif ((scalar @tokens) == 6) {  # if there are 6 fields (and 3 ar
+e empty)

use strict;
use warnings;
...
        warn "Input line $. ignored: $_\n";
    }
}