Help for this page

Select Code to Download

Select or download this

use warnings;
use strict;
...
  # tied Tie::Hash::NamedCapture
  a => ["a", "aa", undef],
}

Select or download this

            case '\003':        /* $^CHILD_ERROR_NATIVE */
                if (memEQs(name, len, "\003HILD_ERROR_NATIVE"))
...
                        require_tie_mod_s(gv, '+', "Tie::Hash::NamedCa
+pture",0);
                }
        break;