Condition Coverage

lib/Perlmazing/Perlmazing/is_email_address.pm
Criterion Covered Total %
condition 6 6 100.0


and 3 conditions

line !l l&&!r l&&r condition
5 1 6 26 length $_[0] <= 254 and $_[0] =~ /\015 # Make captures for user and domain only ($1 and $2), using (?: on any other parenthesis to avoid captures\015 ^\015 ( # Begin first part of email address\015 (?: # Option 1\015 [^<>()[\]\\.,;:\s\@\"]+ # Any character NOT in this set, at least one\015 (?:\015 \.[^<>()[\]\\.,;:\s\@\"]+ # Followed by any character NOT in these set, starting with dot, in groups from 0 to many\015 )*\015 )\015 |\015 (?: # Option 2\015 ".*?(?
7 1 25 length $_[0] <= 254 and $_[0] =~ /\015 # Make captures for user and domain only ($1 and $2), using (?: on any other parenthesis to avoid captures\015 ^\015 ( # Begin first part of email address\015 (?: # Option 1\015 [^<>()[\]\\.,;:\s\@\"]+ # Any character NOT in this set, at least one\015 (?:\015 \.[^<>()[\]\\.,;:\s\@\"]+ # Followed by any character NOT in these set, starting with dot, in groups from 0 to many\015 )*\015 )\015 |\015 (?: # Option 2\015 ".*?(?