Select Code to Download

before 'wafer' => sub{
    my $self = shift;
    if ( ! $self->_wafer_parse_complete ){ $self->_wafer_parse };
    
};

Use of uninitialized value in subroutine entry at Class/MOP/Method/Wra
+pped.pm line 47
Can't use string ("") as a subroutine ref while "strict refs" in use a
+t Class/MOP/Method/Wrapped.pm line 47.

sub _wafer_parse {
    my $self = shift;
...
    while ( <$FILE> ){};
    close $FILE;
}