235µs    local @l1;
1.18s    @l1 = split $tab, $line;
1.79s    @l1 = split $tab, $line;
1.78s    @l1 = split $tab, $line;
824ms    print(join($tab,@l1[@okc]));
806ms    print(join($tab,@l1[@okc]));
1.61s    print(join($tab,@l1[@okc]));

92µs     our @l1;
1.77s    @l1 = split $tab, $line;
1.77s    @l1 = split $tab, $line;
1.77s    @l1 = split $tab, $line;
829ms    print(join($tab,@l1[@okc]));
820ms    print(join($tab,@l1[@okc]));
1.03s    print(join($tab,@l1[@okc]));

         #my @l1;
1.78s    @l1 = split $tab, $line;
1.77s    @l1 = split $tab, $line;
1.77s    @l1 = split $tab, $line;
810ms    print(join($tab,@l1[@okc]));
805ms    print(join($tab,@l1[@okc]));
1.01s    print(join($tab,@l1[@okc]));

1.80s    @l1 = split $tab, $line;
1.70s    my @l1 = split $tab, $line;
2.41s    @l1 = split $tab, $line;
807ms    print(join($tab,@l1[@okc]));
794ms    print(join($tab,@l1[@okc]));
1.65s    print(join($tab,@l1[@okc]));