A universal object for Perl 5