Select Code to Download

package myclass;
use Carp qw(croak);
...

    return bless $class->SUPER::new(23), $class;
}

package myclass;
use Class::Std;
...
    my ($self, $ident, $args) = @_;
    $args->{value} = 23;
}

mysubclass->new;

Missing initializer label for myclass: 'value'.
Fatal error in constructor call