This is my patch patch.1j for perl5.001.