Help for this page
Select Code to Download
Select
or
download this
if ($field1 =~ /^(.*?)(\([^)]*\))$/) { print OUTFILE_B "$1\t$2\t"; }