$re .= qr/(?<$_>$_\s*)/ for @fields;