foreach (@data) { ($1, $2, $3, $4, $5) = m/($_\s)/g; print $2; } [download]
In reply to Re: RegEx needed by Anonymous Monk in thread RegEx needed by Anonymous Monk