perl 3.0 patch #30 patch #29, continued