| line |
true |
false |
branch |
|
329
|
0 |
0 |
if (defined $topic) { } |
|
|
0 |
0 |
elsif (defined $cats) { } |
|
330
|
0 |
0 |
if (exists $$cats{$topic}) { } |
|
365
|
0 |
0 |
if ($argno == 0) |
|
373
|
0 |
0 |
if $argno >= @$scname |
|
409
|
0 |
0 |
unless $$cmpl{'str'} |
|
413
|
0 |
0 |
length $dir ? : |
|
|
0 |
0 |
if (opendir DIR, length $dir ? $dir : '.') { } |
|
417
|
0 |
0 |
unless $file =~ /^\./ |
|
419
|
0 |
0 |
$dir eq '/' ? : |
|
|
0 |
0 |
length $dir ? : |
|
442
|
0 |
0 |
unless -f $_ |
|
445
|
0 |
0 |
-f $c[0] ? : |
|
|
0 |
0 |
if @c == 1 |
|
447
|
0 |
0 |
-d $_ ? : |
|
468
|
0 |
0 |
if @c == 1 |
|
510
|
0 |
0 |
if $$self{'disable_history_expansion'} |
|
514
|
0 |
0 |
unless substr($$cmpl{'tokens'}[0], 0, 1) eq '!' |
|
516
|
0 |
0 |
unless $$self{'term'}->can('GetHistory') |
|
518
|
0 |
0 |
unless @history |
|
530
|
0 |
0 |
if ($$cmpl{'tokno'} > 0) |
|
536
|
0 |
0 |
if $$cmpl{'tokno'} == 0 |
|
574
|
0 |
0 |
if ($arg and $arg eq '-c') |
|
578
|
0 |
0 |
if ($arg and $arg eq '-d') |
|
579
|
0 |
0 |
unless @_ |
|
581
|
0 |
0 |
unless /^\d+$/ |
|
591
|
0 |
0 |
if ($arg and $arg =~ /^(\d+)$/) |
|
595
|
0 |
0 |
if $arg |
|
597
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
if @_ |
|
600
|
0 |
0 |
unless $$self{'term'}->can('GetHistory') |
|
606
|
0 |
0 |
if $num == -1 or $num > @history |
|
608
|
0 |
0 |
if $$self{'term'}->can('where_history') |
|
798
|
0 |
1 |
if ($args{'history_file'}) |
|
799
|
0 |
0 |
$1 ? : |
|
804
|
1 |
12 |
if $_ eq 'app' |
|
841
|
0 |
0 |
length $rawline ? : |
|
|
0 |
0 |
if ref $prompt eq 'ARRAY' |
|
842
|
0 |
0 |
if ref $prompt eq 'CODE' |
|
846
|
0 |
0 |
unless (defined $newline) |
|
853
|
0 |
0 |
length $rawline ? : |
|
854
|
0 |
0 |
unless $$self{'backslash_continues_command'} and $continued |
|
858
|
0 |
0 |
if ($rawline =~ /^\s*$/) |
|
860
|
0 |
0 |
unless defined $rawline and not $rawline =~ /^\s*$/ |
|
865
|
0 |
0 |
if ($rawline =~ /^\s*[!^]/ and not $$self{'disable_history_expansion'}) |
|
870
|
0 |
0 |
if ($$self{'term'}->can('GetHistory')) |
|
874
|
0 |
0 |
if ($tokens) |
|
880
|
0 |
0 |
unless ($match) |
|
886
|
0 |
0 |
if ($expcode == -1) |
|
898
|
0 |
0 |
unless $tokens |
|
900
|
0 |
0 |
if (defined $tokens) |
|
902
|
0 |
0 |
if ($expcode == 2) { } |
|
906
|
0 |
0 |
if $expcode == 1 |
|
922
|
0 |
0 |
if (exists $$cmd{'exclude_from_history'}) |
|
929
|
0 |
0 |
if ($save_to_history and $str ne $$self{'prevcmd'}) |
|
970
|
0 |
0 |
if defined $new |
|
1068
|
0 |
0 |
if ($$self{'blank_repeats_cmd'}) |
|
1289
|
0 |
0 |
if ($try eq '"' or $try eq q[']) |
|
1294
|
0 |
0 |
if ($bq) |
|
1295
|
0 |
0 |
unless $$self{'suppress_completion_escape'} |
|
1388
|
0 |
0 |
if ($cmd and exists $$cmd{'cmds'} and $curtok < $#$tokens) |
|
1399
|
0 |
0 |
$#cname > $curtok ? : |
|
1423
|
0 |
0 |
if $_ ne '' |
|
1445
|
0 |
0 |
if (exists $$cmd{'args'}) |
|
1446
|
0 |
0 |
if (ref $$cmd{'args'} eq 'CODE') { } |
|
|
0 |
0 |
elsif (ref $$cmd{'args'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $$cmd{'args'} eq 'HASH') { } |
|
1448
|
0 |
0 |
if $@ |
|
1454
|
0 |
0 |
if $#$args < $argno |
|
1456
|
0 |
0 |
if (defined $arg) |
|
1457
|
0 |
0 |
if (ref $arg eq 'CODE') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'ARRAY') { } |
|
1460
|
0 |
0 |
if $@ |
|
1466
|
0 |
0 |
if $$cmpl{'twice'} |
|
1473
|
0 |
0 |
if $$cmpl{'twice'} |
|
1503
|
0 |
0 |
if ($$cmpl{'tokno'} < @{$$cmpl{'cname'};}) |
|
1508
|
0 |
0 |
if /^$$cmpl{'str'}/ |
|
1511
|
0 |
0 |
if ($cr or not defined $cmd) |
|
1513
|
0 |
0 |
if (exists $$cset{''}) |
|
1517
|
0 |
0 |
if $r2 |
|
1523
|
0 |
0 |
if exists $$cmd{'maxargs'} and $$cmpl{'argno'} >= $$cmd{'maxargs'} |
|
1569
|
0 |
0 |
unless defined $tokens |
|
1572
|
0 |
0 |
if ($$self{'debug_complete'} >= 1) |
|
1575
|
0 |
0 |
defined $tokno ? : |
|
|
0 |
0 |
defined $tokoff ? : |
|
1585
|
0 |
0 |
if $i eq $tokno |
|
1589
|
0 |
0 |
if $i != $#$tokens |
|
1622
|
0 |
0 |
if ($$self{'debug_complete'} >= 3) |
|
1624
|
0 |
0 |
defined $cmd ? : |
|
1630
|
0 |
0 |
unless defined $retval |
|
1631
|
0 |
0 |
unless ref $retval eq 'ARRAY' |
|
1634
|
0 |
0 |
if ($$self{'debug_complete'} >= 2) |
|
1639
|
0 |
0 |
unless $$self{'suppress_completion_escape'} |
|
1658
|
0 |
0 |
if (ref $val eq 'CODE') |
|
1660
|
0 |
0 |
if $@ |
|
1685
|
0 |
0 |
unless ($cmd) |
|
1686
|
0 |
0 |
if (exists $$topcset{''}) { } |
|
1715
|
0 |
0 |
unless ($cmd) |
|
1716
|
0 |
0 |
if (exists $$topcset{''}) { } |
|
1723
|
0 |
0 |
if ($$self{'display_summary_in_help'}) |
|
1724
|
0 |
0 |
if (exists $$cmd{'desc'}) { } |
|
1731
|
0 |
0 |
if (exists $$cmd{'doc'}) { } |
|
|
0 |
0 |
elsif (exists $$cmd{'cmds'}) { } |
|
1802
|
0 |
0 |
if exists $$cset{$_}{'syn'} |
|
1804
|
0 |
0 |
if $_ eq '' |
|
1824
|
0 |
0 |
unless $$self{'history_file'} and $$self{'history_max'} > 0 |
|
1826
|
0 |
0 |
if (open HIST, '<' . $$self{'history_file'}) |
|
1829
|
0 |
0 |
unless /\S/ |
|
1852
|
0 |
0 |
unless $$self{'history_file'} and $$self{'history_max'} > 0 |
|
1853
|
0 |
0 |
unless $$self{'term'}->can('GetHistory') |
|
1855
|
0 |
0 |
if (open HIST, '>' . $$self{'history_file'}) { } |
|
1858
|
0 |
0 |
if (@list) |
|
1860
|
0 |
0 |
if $$self{'history_max'} - 1 < $max |
|
1900
|
0 |
0 |
if (exists $$cmd{'meth'}) { } |
|
|
0 |
0 |
elsif (exists $$cmd{'proc'}) { } |
|
1902
|
0 |
0 |
if (ref $$cmd{'meth'} eq 'CODE') { } |
|
1904
|
0 |
0 |
if $@ |
|
1910
|
0 |
0 |
if (ref $$cmd{'proc'} eq 'CODE') { } |
|
1912
|
0 |
0 |
if $@ |
|
1917
|
0 |
0 |
if (exists $$cmd{'cmds'}) { } |
|
1934
|
0 |
0 |
unless ($$parms{'cmd'}) |
|
1935
|
0 |
0 |
if (exists $$parms{'cset'}{''} and exists $$parms{'cset'}{''}{'proc'} || exists $$parms{'cset'}{''}{'meth'}) |
|
1954
|
0 |
0 |
if (exists $$cmd{'minargs'} and @{$$parms{'args'};} < $$cmd{'minargs'}) |
|
1958
|
0 |
0 |
if (exists $$cmd{'maxargs'} and @{$$parms{'args'};} > $$cmd{'maxargs'}) |