- or download this
my @tworows = split /[^\n]+\n[^[n]+\n/, $text;
- or download this
s/((\w+).+\1.+\1.+)\n(.+)/something/
- or download this
1.
...
4. it looks like you're using a numeric == to compare ascii fields lik
+e $row1[0] == $row2[0] when col 0 contains things like 'PF'. Use eq f
+or these compares. You can't use == there.