| line |
!l |
l&&!r |
l&&r |
condition |
|
199
|
2 |
1 |
1 |
defined $num and $num =~ / [^0-9] /msx |
|
277
|
1 |
0 |
33 |
$opt->{'load_error'} =~ / ( %+ ) [ #0+-]* [0-9]* s /msx and length($1) % 2 |
|
317
|
3 |
2 |
1 |
defined $arg[0] && $arg[0] =~ /(?x: (?x:
v (?-x:[0-9]+) (?-x: (?-x:\.[0-9]+)+ (?-x:_[0-9]+)? )?
|
(?-x:[0-9]+)? (?-x:\.[0-9]+){2,} (?-x:_[0-9]+)?
) | (?x: (?-x:[0-9]+) (?-x: (?-x:\.[0-9]+) | \. )? (?-x:_[0-9]+)?
|
(?-x:\.[0-9]+) (?-x:_[0-9]+)?
) )/ |
|
372
|
44 |
10 |
19 |
$import and @{$import;} |
|
387
|
15 |
17 |
2 |
$max_arg and @ARGV > $max_arg |