cmpthese(-1,
    {
        regex1  => $regex1,
        regex2  => $regex2,
        unpack  => $unpack,
        split   => $split,
        substr1 => $substr1,
        substr2 => $substr2,
        FH      => $filehandle,
        C_Style => $c_style_string,
    }
);