The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package t::Object::RegisterClassname;
use strict;

use Class::InsideOut;

sub new {
    Class::InsideOut::register( shift );
}

1;