Testing Alpha: 'die' conditions

• new(): 'string' element undefined

  • method will 'die'; capture error message

        eval {
            $self = Alpha->new( {
                string  => undef,
            } );
        };
        like($@, qr/Alpha::new\(\) needs 'string' argument/,
            "Alpha->new(): got expected error message when 'string' was not defined");