Perl 5 mop proposal