bluebottle:~# perl test.pl
$VAR1 = bless( {}, 'Test' );