| line |
!l |
l&&!r |
l&&r |
condition |
|
497
|
0 |
1 |
0 |
defined caller 2 and index(caller 2, "FullAuto") != -1 |
|
500
|
0 |
0 |
0 |
$main::fa_code and $main::fa_conf |
|
|
0 |
0 |
0 |
$main::fa_code and $main::fa_conf and $main::fa_host |
|
|
0 |
0 |
0 |
$main::fa_code and $main::fa_conf and $main::fa_host and $main::fa_menu |
|
525
|
0 |
0 |
0 |
$fa_global::berkeley_db_path and -d $fa_global::berkeley_db_path . 'Defaults' |
|
554
|
0 |
0 |
0 |
exists $ENV{'SSH_CONNECTION'} and exists $ENV{'USER'} |
|
|
0 |
0 |
0 |
exists $ENV{'SSH_CONNECTION'} and exists $ENV{'USER'} and $ENV{'USER'} ne $username |
|
|
0 |
0 |
0 |
$username eq "SYSTEM" and exists $ENV{'IWUSER'} |
|
|
0 |
0 |
0 |
$username eq "SYSTEM" and exists $ENV{'IWUSER'} and $ENV{'IWUSER'} ne $username |
|
818
|
0 |
0 |
0 |
defined $main::fa_code and $main::fa_code |
|
825
|
0 |
0 |
0 |
defined $main::fa_conf and $main::fa_conf |
|
831
|
0 |
0 |
0 |
defined $main::fa_host and $main::fa_host |
|
837
|
0 |
0 |
0 |
defined $main::fa_menu and $main::fa_menu |
|
858
|
0 |
0 |
0 |
$Term::Menus::fa_code->[0] and index($Term::Menus::fa_code->[0], "Net/FullAuto") == -1 |
|
885
|
0 |
0 |
0 |
$Term::Menus::fa_conf->[0] and index($Term::Menus::fa_conf->[0], "Net/FullAuto") == -1 |
|
909
|
0 |
0 |
0 |
$Term::Menus::fa_host->[0] and index($Term::Menus::fa_host->[0], "Net/FullAuto") == -1 |
|
933
|
0 |
0 |
0 |
$Term::Menus::fa_menu->[0] and index($Term::Menus::fa_menu->[0], "Net/FullAuto") == -1 |
|
1059
|
0 |
0 |
0 |
not $m_flag and -f "$dir/$Term::Menus::fa_menu" |
|
1081
|
0 |
0 |
0 |
not $s_flag and -f "$dir/$Term::Menus::fa_code" |
|
1218
|
0 |
0 |
0 |
$Term::Menus::fullauto and defined $Net::FullAuto::FA_Core::service |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and defined $Net::FullAuto::FA_Core::service and $Net::FullAuto::FA_Core::service |
|
1277
|
0 |
0 |
0 |
10 < length $_[0] and unpack("a11", $_[0]) eq "FATAL ERROR" |
|
1278
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
1291
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
1339
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
1343
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
1355
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
1372
|
0 |
0 |
0 |
$banner =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) |
|
|
0 |
0 |
0 |
$banner and ($banner =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)) |
|
|
0 |
0 |
0 |
$banner and ($banner =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)) and defined $picks_from_parent |
|
|
0 |
0 |
0 |
$banner and ($banner =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)) and defined $picks_from_parent and not ref $picks_from_parent |
|
1402
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Select'} and $MenuUnit_hash_ref->{'Select'} |
|
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Select'} and $MenuUnit_hash_ref->{'Select'} and $MenuUnit_hash_ref->{'Select'} =~ /many/i |
|
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Select'} and $MenuUnit_hash_ref->{'Select'} |
|
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Select'} and $MenuUnit_hash_ref->{'Select'} and $MenuUnit_hash_ref->{'Select'} =~ /one/i |
|
1417
|
0 |
0 |
0 |
$picks_from_parent and index($picks_from_parent, "*") != -1 |
|
1437
|
0 |
0 |
0 |
defined $_[11] and $_[11] |
|
|
0 |
0 |
0 |
(caller)[0] ne __PACKAGE__ and not wantarray |
|
1441
|
0 |
0 |
0 |
defined $_[12] and $_[12] |
|
1444
|
0 |
0 |
0 |
defined $_[13] and $_[13] |
|
1455
|
0 |
0 |
0 |
4 < length $key and substr($key, 0, 4) eq "Item" |
|
1475
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Banner'} and not $got_item_flag |
|
1481
|
0 |
0 |
0 |
exists $Items{$num}{'Negate'} and not keys %{$$MenuUnit_hash_ref{"Select"};} |
|
1493
|
0 |
0 |
0 |
$convey_test =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) |
|
1514
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
1515
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
1520
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
1535
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
1540
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
1550
|
0 |
0 |
0 |
0 == $#convey and $convey[0] =~ /^(?:[{](.*)[}])?[<]$/ |
|
1555
|
0 |
0 |
0 |
defined $picks_from_parent and not ref $picks_from_parent |
|
1583
|
0 |
0 |
0 |
exists $Items{$num}{'Exclude'} and $text =~ /$Items{$num}{'Exclude'}/ |
|
1586
|
0 |
0 |
0 |
exists $Items{$num}{'Exclude'} and $text =~ /$Items{$num}{'Exclude'}/ |
|
1597
|
0 |
0 |
0 |
exists $Items{$num}{'Convey'} and $Items{$num}{'Convey'} ne "" |
|
1617
|
0 |
0 |
0 |
exists $Items{$num}{'Select'} and $tsttt =~ /many/i |
|
1642
|
0 |
0 |
0 |
exists $Items{$num}{'Exclude'} and $Items{$num}{'Text'} =~ /$Items{$num}{'Exclude'}/ |
|
1645
|
0 |
0 |
0 |
exists $Items{$num}{'Exclude'} and $Items{$num}{'Text'} =~ /$Items{$num}{'Exclude'}/ |
|
1667
|
0 |
0 |
0 |
exists $Items{$num}{'Select'} and $tsttt =~ /many/i |
|
1689
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Scroll'} and ref $MenuUnit_hash_ref->{'Scroll'} ne "ARRAY" |
|
1725
|
0 |
0 |
0 |
$Term::Menus::fullauto and $master_substituted |
|
1728
|
0 |
0 |
0 |
ref $pick eq "ARRAY" and wantarray |
|
|
0 |
0 |
0 |
ref $pick eq "ARRAY" and wantarray and not $no_wantarray |
|
|
0 |
0 |
0 |
ref $pick eq "ARRAY" and wantarray and not $no_wantarray and 1 == $recurse |
|
1768
|
0 |
0 |
0 |
$Term::Menus::fullauto and $master_substituted |
|
1790
|
0 |
0 |
0 |
1 == $recurse and ref $$pick[$#{$pick;}] eq "HASH" |
|
1794
|
0 |
0 |
0 |
wantarray and 1 == $recurse |
|
|
0 |
0 |
0 |
ref $pick eq "ARRAY" and -1 < $#{$pick;} |
|
|
0 |
0 |
0 |
ref $pick eq "ARRAY" and -1 < $#{$pick;} and $pick->[0] =~ /^[{](.*)[}][<]$/ |
|
1803
|
0 |
0 |
0 |
keys %{$$topmenu{"Select"};} and $topmenu->{'Select'} eq "Many" |
|
|
0 |
0 |
0 |
ref $topmenu eq "HASH" and (keys %{$$topmenu{"Select"};} and $topmenu->{'Select'} eq "Many") |
|
|
0 |
0 |
0 |
ref $savpick eq "HASH" and exists $topmenu->{'Select'}{(keys %{$savpick;})[0]} |
|
|
0 |
0 |
0 |
-1 == $#{$pick;} and ref $topmenu eq "HASH" |
|
|
0 |
0 |
0 |
-1 == $#{$pick;} and ref $topmenu eq "HASH" and grep {/Item_/;} keys %{$topmenu;} |
|
1837
|
0 |
0 |
0 |
ref $_[0] eq "HASH" and exists $_[0]{'Name'} |
|
1839
|
0 |
0 |
0 |
defined $_[1] and $_[1] |
|
1859
|
0 |
0 |
0 |
ref $vars->{$key} eq "HASH" and %{$_[0];} eq %{$vars->{$key};} |
|
1938
|
0 |
0 |
0 |
exists $hashref_to_test->{'Input'} and $hashref_to_test->{'Input'} |
|
|
0 |
0 |
0 |
keys %{$hashref_to_test;} && grep({/Banner/;} keys %{$hashref_to_test;}) |
|
2008
|
0 |
0 |
0 |
(index($text, "][[") != -1) and (index($text, "]][") != -1) |
|
2009
|
0 |
0 |
0 |
$text =~ /^\s*\]\[\[\s*/s and $text =~ /\s*\]\]\[\s*$/s |
|
2027
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
2036
|
0 |
0 |
0 |
0 < $#pks and not $return_from_child_menu |
|
2229
|
0 |
0 |
0 |
$ikey eq "TAB" and exists $input->{'focus'} |
|
2280
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Focus'} and $MenuUnit_hash_ref->{'Focus'} |
|
2299
|
0 |
0 |
0 |
$#instructions == 2 and $instructions[2] > 0 |
|
2312
|
0 |
0 |
0 |
$ikey ne "TAB" and defined $numbor |
|
2421
|
0 |
0 |
0 |
(index($text, "][[") != -1) and (index($text, "]][") != -1) |
|
2422
|
0 |
0 |
0 |
$text =~ /^\s*\]\[\[\s*/s and $text =~ /\s*\]\]\[\s*$/s |
|
2442
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
2459
|
0 |
0 |
0 |
$esc_one =~ /[{]/ and $text =~ /$esc_one/ |
|
2493
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
2516
|
0 |
0 |
0 |
$text =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) |
|
2523
|
0 |
0 |
0 |
$replace =~ /^.(?
|
|
2536
|
0 |
0 |
0 |
$replace =~ /^.(?
|
|
2544
|
0 |
0 |
0 |
$replace =~ /^.(?
|
|
2550
|
0 |
0 |
0 |
$text =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) |
|
2650
|
0 |
0 |
0 |
$SavePick and exists $SavePick->{$MenuUnit_hash_ref} |
|
2709
|
0 |
0 |
0 |
$result =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) |
|
2720
|
0 |
0 |
0 |
$result =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) |
|
2738
|
0 |
0 |
0 |
$seltext =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) |
|
2766
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Select'} && $MenuUnit_hash_ref->{'Select'} |
|
2768
|
0 |
0 |
0 |
$pick and exists $$FullMenu{$_[0]}[3]{$_[1][$pick - 1]} |
|
2769
|
0 |
0 |
0 |
$pick and exists $_[0]{$$FullMenu{$_[0]}[4]{$_[1][$pick - 1]}}{'Convey'} |
|
2785
|
0 |
0 |
0 |
ref $convey eq "ARRAY" and $#{$convey;} == 0 |
|
2798
|
0 |
0 |
0 |
ref $convey eq "ARRAY" and $#{$convey;} == -1 |
|
2807
|
0 |
0 |
0 |
$pick and exists $$FullMenu{$_[0]}[2]{$_[1][$pick - 1]} |
|
|
0 |
0 |
0 |
ref $test_item eq "HASH" and (values %{$test_item;})[0] ne "recurse" |
|
|
0 |
0 |
0 |
$pick and exists $$FullMenu{$_[0]}[2]{$_[1][$pick - 1]} and (ref $test_item eq "HASH" and (values %{$test_item;})[0] ne "recurse") |
|
2812
|
0 |
0 |
0 |
ref $test_item eq "HASH" and grep({/Item_/;} keys %{$test_item;}) || $show_banner_only && grep({/Banner/;} keys %{$test_item;}) |
|
|
0 |
0 |
0 |
$test_item =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) |
|
2868
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
2880
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
2885
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
2929
|
0 |
0 |
0 |
$pick and ref $_[0]{$$FullMenu{$_[0]}[4]{$_[1][$pick - 1]}}{'Result'} eq "HASH" |
|
2948
|
0 |
0 |
0 |
not exists $Persists->{$MenuUnit_hash_ref}{'defaults'} and defined do {
[keys %{$$FullMenu{$MenuUnit_hash_ref}[5];}]
}->[0] |
|
2978
|
0 |
0 |
0 |
$numbor =~ /\d+/ and $numbor <= $start || $start + $choose_num < $numbor || $numbor eq 'admin' |
|
3013
|
0 |
0 |
0 |
$gotmany and $numbor =~ /^[Ff]$/ |
|
|
0 |
0 |
0 |
$picks{$picknum} ne "+" and $picks{$picknum} ne "-" |
|
|
0 |
0 |
0 |
$picks{$picknum} ne "+" and $picks{$picknum} ne "-" and not $gotmany |
|
3021
|
0 |
0 |
0 |
exists $FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$picknum - 1]} and ref $FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$picknum - 1]} eq "HASH" |
|
|
0 |
0 |
0 |
exists $FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$picknum - 1]} and ref $FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$picknum - 1]} eq "HASH" and grep {/Item_/;} keys %{$$FullMenu{$MenuUnit_hash_ref}[3];} |
|
3065
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
3071
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
3097
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
3099
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
3106
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
3123
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
3130
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
3143
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
3155
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
3161
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
3179
|
0 |
0 |
0 |
(index($firsterr, "Undefined subroutine") != -1) and (index($firsterr, $sub) != -1) |
|
3230
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
3232
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
3238
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
3254
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
3260
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
3273
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
3304
|
0 |
0 |
0 |
not $hidedefaults and ref $FullMenu->{$MenuUnit_hash_ref}[5] eq "HASH" |
|
|
0 |
0 |
0 |
not $hidedefaults and ref $FullMenu->{$MenuUnit_hash_ref}[5] eq "HASH" and $FullMenu->{$MenuUnit_hash_ref}[5]{$all_menu_items_array[$picknum - 1]} |
|
|
0 |
0 |
0 |
not $hidedefaults and ref $FullMenu->{$MenuUnit_hash_ref}[5] eq "HASH" and $FullMenu->{$MenuUnit_hash_ref}[5]{$all_menu_items_array[$picknum - 1]} and $FullMenu->{$MenuUnit_hash_ref}[5]{$all_menu_items_array[$picknum - 1]} eq '*' || $all_menu_items_array[$picknum - 1] =~ /$FullMenu->{$MenuUnit_hash_ref}[5]{$all_menu_items_array[$picknum - 1]}/ |
|
3317
|
0 |
0 |
0 |
ref $FullMenu->{$MenuUnit_hash_ref}[8] eq "HASH" and keys %{$$FullMenu{$MenuUnit_hash_ref}[8];} |
|
|
0 |
0 |
0 |
ref $FullMenu->{$MenuUnit_hash_ref}[8] eq "HASH" and keys %{$$FullMenu{$MenuUnit_hash_ref}[8];} and exists $FullMenu->{$MenuUnit_hash_ref}[8]{$all_menu_items_array[$picknum - 1]} |
|
|
0 |
0 |
0 |
ref $FullMenu->{$MenuUnit_hash_ref}[8] eq "HASH" and keys %{$$FullMenu{$MenuUnit_hash_ref}[8];} and exists $FullMenu->{$MenuUnit_hash_ref}[8]{$all_menu_items_array[$picknum - 1]} and $FullMenu->{$MenuUnit_hash_ref}[8]{$all_menu_items_array[$picknum - 1]} |
|
3327
|
0 |
0 |
0 |
exists $SavePick->{$MenuUnit_hash_ref}{$picknum_for_display} and $SavePick->{$MenuUnit_hash_ref}{$picknum_for_display} |
|
3344
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'}[1] eq $picknum || $MenuUnit_hash_ref->{'Scroll'}[0] eq $picknum |
|
3376
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and $Net::FullAuto::FA_Core::makeplan |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and $Net::FullAuto::FA_Core::makeplan and $Persists->{$MenuUnit_hash_ref}{'defaults'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and $Net::FullAuto::FA_Core::makeplan and $Persists->{$MenuUnit_hash_ref}{'defaults'} and not $filtered_menu |
|
3407
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
3445
|
0 |
0 |
0 |
$Persists->{$MenuUnit_hash_ref}{'defaults'} and not $filtered_menu |
|
3477
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Input'} and $MenuUnit_hash_ref->{'Input'} |
|
3517
|
0 |
0 |
0 |
$numbor =~ /^[Ff]$/ and $Persists->{$MenuUnit_hash_ref}{'defaults'} || $filtered_menu |
|
|
0 |
0 |
0 |
$numbor =~ /^\ || $ikey eq 'LEFTARROW' and $FullMenu |
|
|
0 |
0 |
0 |
$numbor =~ /^\>/ || $ikey eq 'RIGHTARROW' and exists $SaveNext->{$MenuUnit_hash_ref} |
|
|
0 |
0 |
0 |
$numbor =~ /^\>/ || $ikey eq 'RIGHTARROW' and exists $SaveNext->{$MenuUnit_hash_ref} and grep({/-|\+/;} values %picks) || $show_banner_only |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and $ikey eq 'F1' || $numbor =~ /^help$/i |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and $numbor =~ /^admin$/i |
|
|
0 |
0 |
0 |
not keys %{$$FullMenu{$MenuUnit_hash_ref}[1];} and $numbor =~ /^[Aa]$/ |
|
3593
|
0 |
0 |
0 |
exists do {
$FullMenu
}->{$chosen}[2]{${$_[0];}[$pk - 1]} and keys %{do {
$FullMenu
}->{$chosen}[2]{${$_[0];}[$pk - 1]};} |
|
3594
|
0 |
0 |
0 |
${${$FullMenu;}{$parent_menu}[10];}[$pk - 1] and not ${$_[0];}[$pk - 1] |
|
3624
|
0 |
0 |
0 |
$return_values and $Term::Menus::fullauto |
|
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$return_values and $Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$return_values and $Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
3629
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
3656
|
0 |
0 |
0 |
$sorted and $sorted eq "forward" |
|
3665
|
0 |
0 |
0 |
exists $pn{$picknum} and exists $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} |
|
|
0 |
0 |
0 |
exists $pn{$picknum} and exists $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} and $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} |
|
|
0 |
0 |
0 |
exists $pn{$picknum} and exists $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} and $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} and ref $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} eq "HASH" |
|
|
0 |
0 |
0 |
exists $pn{$picknum} and exists $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} and $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} and ref $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} eq "HASH" and keys %{$FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]};} |
|
|
0 |
0 |
0 |
exists $pn{$picknum} and exists $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} and $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} and ref $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} eq "HASH" and keys %{$FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]};} and $FullMenu->{$MenuUnit_hash_ref}[8]{$pn{$picknum}[0]} |
|
3759
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
3764
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
3783
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
3785
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
3790
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
3805
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
3810
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
3822
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
3834
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
3839
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
3857
|
0 |
0 |
0 |
(index($firsterr, "Undefined subroutine") != -1) and (index($firsterr, $sub) != -1) |
|
3898
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
3899
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
3904
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
3919
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
3924
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
3936
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
4042
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
4047
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
4066
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
4068
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4073
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4088
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4093
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4105
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
4117
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
4122
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
4140
|
0 |
0 |
0 |
(index($firsterr, "Undefined subroutine") != -1) and (index($firsterr, $sub) != -1) |
|
4181
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
4182
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4187
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4202
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4207
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4219
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
4283
|
0 |
0 |
0 |
$def and $text =~ /$def/ |
|
4337
|
0 |
0 |
0 |
$menu_output eq "-" and exists $SavePick->{$MenuUnit_hash_ref} |
|
|
0 |
0 |
0 |
$menu_output eq "+" and exists $SavePick->{$MenuUnit_hash_ref} |
|
4355
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
4360
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
4379
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
4381
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4386
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4401
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4406
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4418
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
4430
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
4435
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
4453
|
0 |
0 |
0 |
(index($firsterr, "Undefined subroutine") != -1) and (index($firsterr, $sub) != -1) |
|
4494
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
4495
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4500
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4515
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4520
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4532
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
4567
|
0 |
0 |
0 |
$parent_menu->{'Scroll'}[1] > 1 and not exists $main::maintain_scroll_flag->{$parent_menu} |
|
4614
|
0 |
0 |
0 |
ref $menu_output eq "ARRAY" and $menu_output->[0] =~ /^[{](.*)[}][<]$/ |
|
4647
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
4652
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
4673
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
4678
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
4697
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
4699
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4704
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4719
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4724
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4736
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
4748
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
4753
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
4771
|
0 |
0 |
0 |
(index($firsterr, "Undefined subroutine") != -1) and (index($firsterr, $sub) != -1) |
|
4812
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
4813
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4818
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4833
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
4838
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
4850
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
4881
|
0 |
0 |
0 |
$menu_output[0] ne "-" and $menu_output[0] ne "+" |
|
4933
|
0 |
0 |
0 |
$numbor and unpack("a1", $numbor) eq "!" |
|
|
0 |
0 |
0 |
!$ikey || $ikey eq 'ENTER' and $numbor =~ /^()$/ || $numbor =~ /^\n/ |
|
4934
|
0 |
0 |
0 |
$ikey ne "PAGEUP" and exists $MenuUnit_hash_ref->{'Scroll'} |
|
|
0 |
0 |
0 |
$ikey ne "PAGEUP" and exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'} |
|
4942
|
0 |
0 |
0 |
$curscreennum - $remainder == $MenuUnit_hash_ref->{'Scroll'}[1] and $curscreennum == $num_pick |
|
4948
|
0 |
0 |
0 |
not $remainder and $num_pick == $start + 1 || $num_pick == $start + $display_this_many_items |
|
4965
|
0 |
0 |
0 |
$ikey eq "PAGEUP" and exists $MenuUnit_hash_ref->{'Scroll'} |
|
|
0 |
0 |
0 |
$ikey eq "PAGEUP" and exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'} |
|
4977
|
0 |
0 |
0 |
$MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'} |
|
4993
|
0 |
0 |
0 |
$MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'} |
|
5015
|
0 |
0 |
0 |
$ikey eq 'DOWNARROW' || $numbor =~ /^d$/i and exists $MenuUnit_hash_ref->{'Scroll'} |
|
|
0 |
0 |
0 |
$ikey eq 'DOWNARROW' || $numbor =~ /^d$/i and exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'} |
|
|
0 |
0 |
0 |
$ikey eq "ENTER" and exists $MenuUnit_hash_ref->{'Scroll'} |
|
|
0 |
0 |
0 |
$ikey eq "ENTER" and exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'} |
|
|
0 |
0 |
0 |
$ikey eq "ENTER" and exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'} and not $show_banner_only |
|
5051
|
0 |
0 |
0 |
$parent_menu and exists $parent_menu->{'Scroll'} |
|
5054
|
0 |
0 |
0 |
$curscreennum + $display_this_many_items < $parent_menu->{'Scroll'}[1] and $parent_menu->{'Scroll'}[1] < $numpick |
|
5070
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'} |
|
5082
|
0 |
0 |
0 |
keys %picks and $numbor =~ /^[Ff]$/ |
|
5095
|
0 |
0 |
0 |
$Persists->{$MenuUnit_hash_ref}{'defaults'} and not $filtered_menu |
|
5099
|
0 |
0 |
0 |
exists $picks{$pick} and not $picks{$numbor} |
|
5116
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'Result'} and not defined $MenuUnit_hash_ref->{'Result'} |
|
5158
|
0 |
0 |
0 |
$select_many || exists do {
$MenuUnit_hash_ref
}->{'Select'}{$numbor} and not $numbor =~ /^[Ff]$/ |
|
|
0 |
0 |
0 |
$show_banner_only and exists $MenuUnit_hash_ref->{'Result'} |
|
|
0 |
0 |
0 |
$show_banner_only and exists $MenuUnit_hash_ref->{'Result'} and ref $MenuUnit_hash_ref->{'Result'} eq "HASH" |
|
|
0 |
0 |
0 |
$numbor =~ /^\d+$/ and ref $FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$digital_numbor - 1] or $all_menu_items_array[$pn{$digital_numbor}[1] - 1]} eq "HASH" |
|
|
0 |
0 |
0 |
$numbor =~ /^[Ff]$/ and ref $FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[((keys %picks)[0] || 1) - 1]} eq "HASH" |
|
|
0 |
0 |
0 |
$FullMenu and $caller eq $callertest |
|
|
0 |
0 |
0 |
$FullMenu and $caller eq $callertest and $select_many || keys %{$$MenuUnit_hash_ref{'Select'};} |
|
|
0 |
0 |
0 |
$show_banner_only and exists $MenuUnit_hash_ref->{'Result'} |
|
|
0 |
0 |
0 |
$show_banner_only and exists $MenuUnit_hash_ref->{'Result'} and ref $MenuUnit_hash_ref->{'Result'} eq "CODE" |
|
|
0 |
0 |
0 |
keys %{$$FullMenu{$MenuUnit_hash_ref}[2];} and exists $FullMenu->{$MenuUnit_hash_ref}[2]{$pn{$numbor}[0]} |
|
|
0 |
0 |
0 |
$return_from_child_menu and not exists $SavePick->{$MenuUnit_hash_ref}{$pn{$numbor}} |
|
5161
|
0 |
0 |
0 |
$filtered_menu and exists $SavePick->{$parent_menu}{$numbor} |
|
5167
|
0 |
0 |
0 |
exists $picks{$pick} and not $picks{$numbor} |
|
5210
|
0 |
0 |
0 |
defined $all_menu_items_array[$key - 1] and exists do {
$FullMenu
}->{$MenuUnit_hash_ref}[1]{$all_menu_items_array[$key - 1]} |
|
|
0 |
0 |
0 |
defined $all_menu_items_array[$key - 1] and exists do {
$FullMenu
}->{$MenuUnit_hash_ref}[1]{$all_menu_items_array[$key - 1]} and grep {$items{$numbor} eq $_;} @{do {
$FullMenu
}->{$MenuUnit_hash_ref}[1]{$all_menu_items_array[$key - 1]};} |
|
5234
|
0 |
0 |
0 |
$prev_menu and $prev_menu != $numbor |
|
5261
|
0 |
0 |
0 |
$#items == 0 and ref $items[0] eq "HASH" |
|
|
0 |
0 |
0 |
$#items == 0 and ref $items[0] eq "HASH" and not grep({/Item_/;} keys %{$items[0];}) |
|
|
0 |
0 |
0 |
$#items == 0 and ref $items[0] eq "HASH" and not grep({/Item_/;} keys %{$items[0];}) and grep {/Banner/;} keys %{$items[0];} |
|
5328
|
0 |
0 |
0 |
do {
not $show_banner_only
} && do {
foreach my $key (keys %picks) {
if ($start <= $key or $key <= $start + $choose_num) {
$numbor = $key;
last;
};
}
} |
|
5346
|
0 |
0 |
0 |
$prev_menu and $prev_menu != $numbor |
|
5375
|
0 |
0 |
0 |
keys %picks and $numbor =~ /^[Ff]$/ |
|
5467
|
0 |
0 |
0 |
ref $menu_output eq "ARRAY" and $menu_output->[0] =~ /^[{](.*)[}][<]$/ |
|
5481
|
0 |
0 |
0 |
$curscreennum < $MenuUnit_hash_ref->{'Scroll'}[1] and $display_this_many_items < $num_pick - $start |
|
5510
|
0 |
0 |
0 |
$menu_output eq "DONE" and 1 < $recurse_level |
|
5539
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
5544
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
5566
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
5571
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
5591
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
5593
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
5599
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
5614
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
5620
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
5636
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
5648
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
5653
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
5671
|
0 |
0 |
0 |
(index($firsterr, "Undefined subroutine") != -1) and (index($firsterr, $sub) != -1) |
|
5723
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
5725
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
5730
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
5745
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
5750
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
5766
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
5779
|
0 |
0 |
0 |
not $numbor =~ /^[Ff]$/ and exists $picks{$numbor} |
|
5797
|
0 |
0 |
0 |
$test_result =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ && grep({$1 eq $_;} list_module('main', $Term::Menus::fa_code) && $picks{$numbor} ne '*') |
|
|
0 |
0 |
0 |
$test_result and not $test_result =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ && grep({$1 eq $_;} list_module('main', $Term::Menus::fa_code) && $picks{$numbor} ne '*') |
|
|
0 |
0 |
0 |
defined $pn{$numbor}[0] && exists do {
$FullMenu
}->{$MenuUnit_hash_ref}[2]{$pn{$numbor}[0]} |
|
5826
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
5827
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
5832
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
5847
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
5852
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
5864
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
5889
|
0 |
0 |
0 |
wantarray and not $no_wantarray |
|
5908
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
5913
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
5934
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
5939
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
5959
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
5961
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
5966
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
5981
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
5986
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
5998
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
6010
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
6015
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
6033
|
0 |
0 |
0 |
(index($firsterr, "Undefined subroutine") != -1) and (index($firsterr, $sub) != -1) |
|
6074
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
6075
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
6080
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
6095
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
6100
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
6112
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
6136
|
0 |
0 |
0 |
$test_result =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ && grep({$1 eq $_;} list_module('main', $Term::Menus::fa_code)) |
|
6183
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
6184
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
6189
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
6204
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
6209
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
6219
|
0 |
0 |
0 |
0 == $#resu and ref $resu[0] eq "CODE" |
|
6229
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
6232
|
0 |
0 |
0 |
keys %{$resu[0];} && $parent_menu |
|
6279
|
0 |
0 |
0 |
ref $test_item eq "HASH" and grep {/Item_/;} keys %{$test_item;} |
|
6356
|
0 |
0 |
0 |
$menu_output eq "DONE" and 1 < $recurse_level |
|
|
0 |
0 |
0 |
ref $menu_output eq "ARRAY" and $menu_output->[0] =~ /^[{]${test_for_menu_name}[}][<]$/ |
|
6404
|
0 |
0 |
0 |
exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists $MenuUnit_hash_ref->{'NoPlan'} && $MenuUnit_hash_ref->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
6409
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
6427
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
6428
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
6433
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
6448
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
6453
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
6472
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
6484
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
6489
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
6514
|
0 |
0 |
0 |
(index($firsterr, "Undefined subroutine") != -1) and (index($firsterr, $sub) != -1) |
|
6571
|
0 |
0 |
0 |
10 < length $@ and unpack("a11", $@) eq "FATAL ERROR" |
|
6572
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
6577
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
6592
|
0 |
0 |
0 |
$parent_menu and wantarray |
|
|
0 |
0 |
0 |
$parent_menu and wantarray and not $no_wantarray |
|
6597
|
0 |
0 |
0 |
defined $log_handle and index($log_handle, "*") != -1 |
|
6616
|
0 |
0 |
0 |
0 < $#resu and wantarray |
|
|
0 |
0 |
0 |
0 < $#resu and wantarray and not $no_wantarray |
|
6660
|
0 |
0 |
0 |
exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} |
|
|
0 |
0 |
0 |
$Term::Menus::fullauto and not exists do {
$MenuUnit_hash_ref
}->{'NoPlan'} && do {
$MenuUnit_hash_ref
}->{'NoPlan'} and defined $Net::FullAuto::FA_Core::makeplan |
|
6664
|
0 |
0 |
0 |
-1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'} |
|
6695
|
0 |
0 |
0 |
(index($result_string, "][[") != -1) and (index($result_string, "]][") != -1) |