my $object = bless \do {my $var} => $class;