Help for this page
$re .= qr/(?<$_>$_\s*)/ for @fields;
for my $field (@fields) $re=$re.qr/(?<$_>$_\s*)/