On Tue, Jul 12, 2005 at 10:44:02PM -0400, James E Keenan wrote: > >The other examples in the ticket play out the same way: > > > > bless {}, ref $class || $class; > > > > I encountered the coverage problem inherent in this code in the > constructor of a module whose maintenance I recently assumed. (For that > matter, I could have encountered it in modules I myself wrote and still > maintain.) I eventually figured that there was no reasonable way to > make the "red" in the top line of the condition box go away. And since > that was the last remaining bit of uncovered code within the > constructor, I figured I should clean that up as well. So I re-coded > along these lines: > > my $self = ref($class) ? bless( {}, ref($class) ) > : bless( {}, $class ); > > More verbose. Less elegant. But more strictly precise. And 100% > testable with reasonable conditions.
I would have just eliminated the $obj->new option. In all my years of programming Perl I've never used it nor have I recently seen it used. Pure YAGNI. bless {}, $class; -- Michael G Schwern [EMAIL PROTECTED] http://www.pobox.com/~schwern 'All anyone gets in a mirror is themselves,' she said. 'But what you gets in a good gumbo is everything.' -- "Witches Abroad" by Terry Prachett