(Perl) a safe, simple inside-out object construction kit