Select Code to Download

       dirinfo = newRV_noinc((SV *)newdirinfo);

       sv_setsv(dirinfo, sv_2mortal(newRV_noinc((SV *)newdirinfo)));

        hv_store(newdirinfo, "Errors", 6, newRV((SV *)errs), 0);