~/examples$ perl 027_twop.pl $VAR1 = bless( { 'bloop' => 'Woman Tightening Her Husband\'s Leather Belt' }, 'Krunch' );
dump
Twop
Krunch