Testing Alpha: 'die' conditions (2)

• new(): 'string' element is empty string

  • method will 'die'; capture error message

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

continued...