sub trim { my @out = @_; for (@out) { s/F15-19/F\t15-19/; s/M1-4/M\t1-4/; s/85+/85\t115/; s/M\s/M\t/; s/F\s/F\t/; s/-/\t/; } return wantarray ? @out : $out[0]; }
In reply to Line trimming regex doesn't work as expected by Win
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |