if ( $line =~ $re ) {
        $cb->(@{^CAPTURE});
        last;