my $obj = MyObject->new(level=>LOG_DEBUG);