Select Code to Download

    "Class::Next=HASH(0xdeadbeef)"->new()

    sub new {
        my $class= shift(@_);
...
            if  ref $class;
        # ...
    }

  sub new { bless {}, ref $_[0] || $_[0]; }

 
 sub new { croak "new takes class" if ref $_[0]; bless {}, $_[0]; }

    Can't locate object method "twirl" via package "Bar=ARRAY(0xbadd0g
+5)"