Condition Coverage

blib/lib/Term/Menus.pm
Criterion Covered Total %
condition 2 1897 0.1


and 3 conditions

line !l l&&!r l&&r condition
493 0 1 0 defined caller 2 and -1 < index(caller 2, "FullAuto")
496 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
521 0 0 0 $fa_global::berkeley_db_path and -d $fa_global::berkeley_db_path . "Defaults"
550 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
814 0 0 0 defined $main::fa_code and $main::fa_code
821 0 0 0 defined $main::fa_conf and $main::fa_conf
827 0 0 0 defined $main::fa_host and $main::fa_host
833 0 0 0 defined $main::fa_menu and $main::fa_menu
854 0 0 0 $Term::Menus::fa_code->[0] and -1 == index($Term::Menus::fa_code->[0], "Net/FullAuto")
881 0 0 0 $Term::Menus::fa_conf->[0] and -1 == index($Term::Menus::fa_conf->[0], "Net/FullAuto")
905 0 0 0 $Term::Menus::fa_host->[0] and -1 == index($Term::Menus::fa_host->[0], "Net/FullAuto")
929 0 0 0 $Term::Menus::fa_menu->[0] and -1 == index($Term::Menus::fa_menu->[0], "Net/FullAuto")
1055 0 0 0 not $m_flag and -f "$dir/$Term::Menus::fa_menu"
1077 0 0 0 not $s_flag and -f "$dir/$Term::Menus::fa_code"
1213 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
1272 0 0 0 10 < length $_[0] and unpack("a11", $_[0]) eq "FATAL ERROR"
1273 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
1286 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
1334 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
1338 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
1350 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
1367 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
1397 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
1412 0 0 0 $picks_from_parent and -1 < index($picks_from_parent, "*")
1432 0 0 0 defined $_[11] and $_[11]
0 0 0 (caller)[0] ne "Term::Menus" and not wantarray
1436 0 0 0 defined $_[12] and $_[12]
1439 0 0 0 defined $_[13] and $_[13]
1450 0 0 0 4 < length $key and substr($key, 0, 4) eq "Item"
1470 0 0 0 exists $MenuUnit_hash_ref->{'Banner'} and not $got_item_flag
1476 0 0 0 exists $Items{$num}{'Negate'} and not keys %{$$MenuUnit_hash_ref{"Select"};}
1488 0 0 0 $convey_test =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)
1509 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
1510 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
1515 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
1530 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
1535 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
1545 0 0 0 0 == $#convey and $convey[0] =~ /^(?:[{](.*)[}])?[<]$/
1550 0 0 0 defined $picks_from_parent and not ref $picks_from_parent
1578 0 0 0 exists $Items{$num}{'Exclude'} and $text =~ /$Items{$num}{'Exclude'}/
1581 0 0 0 exists $Items{$num}{'Exclude'} and $text =~ /$Items{$num}{'Exclude'}/
1592 0 0 0 exists $Items{$num}{'Convey'} and $Items{$num}{'Convey'} ne ""
1612 0 0 0 exists $Items{$num}{'Select'} and $tsttt =~ /many/i
1637 0 0 0 exists $Items{$num}{'Exclude'} and $Items{$num}{'Text'} =~ /$Items{$num}{'Exclude'}/
1640 0 0 0 exists $Items{$num}{'Exclude'} and $Items{$num}{'Text'} =~ /$Items{$num}{'Exclude'}/
1662 0 0 0 exists $Items{$num}{'Select'} and $tsttt =~ /many/i
1684 0 0 0 exists $MenuUnit_hash_ref->{'Scroll'} and ref $MenuUnit_hash_ref->{'Scroll'} ne "ARRAY"
1720 0 0 0 $Term::Menus::fullauto and $master_substituted
1723 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
1763 0 0 0 $Term::Menus::fullauto and $master_substituted
1785 0 0 0 1 == $recurse and ref $$pick[$#{$pick;}] eq "HASH"
1789 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] =~ /^[{](.*)[}][<]$/
1798 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;}
1830 0 0 0 ref $_[0] eq "HASH" and exists $_[0]{'Name'}
1832 0 0 0 defined $_[1] and $_[1]
1852 0 0 0 ref $vars->{$key} eq "HASH" and %{$_[0];} eq %{$vars->{$key};}
1931 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;})
2001 0 0 0 -1 < index($text, "][[") and -1 < index($text, "]][")
2002 0 0 0 $text =~ /^\s*\]\[\[\s*/s and $text =~ /\s*\]\]\[\s*$/s
2020 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
2029 0 0 0 0 < $#pks and not $return_from_child_menu
2194 0 0 0 $ikey eq "TAB" and exists $input->{'focus'}
2225 0 0 0 exists $MenuUnit_hash_ref->{'Focus'} and $MenuUnit_hash_ref->{'Focus'}
2244 0 0 0 $#instructions == 2 and $instructions[2] > 0
2257 0 0 0 $ikey ne "TAB" and defined $numbor
2363 0 0 0 -1 < index($text, "][[") and -1 < index($text, "]][")
2364 0 0 0 $text =~ /^\s*\]\[\[\s*/s and $text =~ /\s*\]\]\[\s*$/s
2384 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
2401 0 0 0 $esc_one =~ /[{]/ and $text =~ /$esc_one/
2435 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
2458 0 0 0 $text =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)
2465 0 0 0 $replace =~ /^.(?
2478 0 0 0 $replace =~ /^.(?
2486 0 0 0 $replace =~ /^.(?
2492 0 0 0 $text =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)
2592 0 0 0 $SavePick and exists $SavePick->{$MenuUnit_hash_ref}
2651 0 0 0 $result =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)
2662 0 0 0 $result =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)
2680 0 0 0 $seltext =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)
2708 0 0 0 exists $MenuUnit_hash_ref->{'Select'} && $MenuUnit_hash_ref->{'Select'}
2710 0 0 0 $pick and exists $$FullMenu{$_[0]}[3]{$_[1][$pick - 1]}
2711 0 0 0 $pick and exists $_[0]{$$FullMenu{$_[0]}[4]{$_[1][$pick - 1]}}{'Convey'}
2727 0 0 0 ref $convey eq "ARRAY" and $#{$convey;} == 0
2740 0 0 0 ref $convey eq "ARRAY" and $#{$convey;} == -1
2749 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")
2754 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)
2810 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
2822 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
2827 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
2871 0 0 0 $pick and ref $_[0]{$$FullMenu{$_[0]}[4]{$_[1][$pick - 1]}}{'Result'} eq "HASH"
2890 0 0 0 not exists $Persists->{$MenuUnit_hash_ref}{'defaults'} and defined do { [keys %{$$FullMenu{$MenuUnit_hash_ref}[5];}] }->[0]
2920 0 0 0 $numbor =~ /\d+/ and $numbor <= $start || $start + $choose_num < $numbor || $numbor eq 'admin'
2955 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
2963 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];}
3007 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
3013 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
3039 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
3041 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
3048 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
3065 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
3072 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
3085 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
3097 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
3103 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
3121 0 0 0 -1 < index($firsterr, "Undefined subroutine") and -1 < index($firsterr, $sub)
3172 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
3174 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
3180 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
3196 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
3202 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
3215 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
3246 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]}/
3259 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]}
3269 0 0 0 exists $SavePick->{$MenuUnit_hash_ref}{$picknum_for_display} and $SavePick->{$MenuUnit_hash_ref}{$picknum_for_display}
3286 0 0 0 exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'}[1] eq $picknum || $MenuUnit_hash_ref->{'Scroll'}[0] eq $picknum
3318 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
3349 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
3387 0 0 0 $Persists->{$MenuUnit_hash_ref}{'defaults'} and not $filtered_menu
3419 0 0 0 exists $MenuUnit_hash_ref->{'Input'} and $MenuUnit_hash_ref->{'Input'}
3459 0 0 0 $numbor =~ /^[Ff]$/ and $Persists->{$MenuUnit_hash_ref}{'defaults'} || $filtered_menu
0 0 0 $numbor =~ /^\
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]$/
3535 0 0 0 exists do { $FullMenu }->{$chosen}[2]{${$_[0];}[$pk - 1]} and keys %{do { $FullMenu }->{$chosen}[2]{${$_[0];}[$pk - 1]};}
3536 0 0 0 ${${$FullMenu;}{$parent_menu}[10];}[$pk - 1] and not ${$_[0];}[$pk - 1]
3566 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
3571 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
3598 0 0 0 $sorted and $sorted eq "forward"
3607 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]}
3701 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
3706 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
3725 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
3727 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
3732 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
3747 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
3752 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
3764 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
3776 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
3781 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
3799 0 0 0 -1 < index($firsterr, "Undefined subroutine") and -1 < index($firsterr, $sub)
3840 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
3841 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
3846 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
3861 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
3866 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
3878 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
3984 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
3989 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
4008 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
4010 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4015 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4030 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4035 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4047 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
4059 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
4064 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
4082 0 0 0 -1 < index($firsterr, "Undefined subroutine") and -1 < index($firsterr, $sub)
4123 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
4124 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4129 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4144 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4149 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4161 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
4225 0 0 0 $def and $text =~ /$def/
4279 0 0 0 $menu_output eq "-" and exists $SavePick->{$MenuUnit_hash_ref}
0 0 0 $menu_output eq "+" and exists $SavePick->{$MenuUnit_hash_ref}
4297 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
4302 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
4321 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
4323 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4328 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4343 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4348 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4360 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
4372 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
4377 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
4395 0 0 0 -1 < index($firsterr, "Undefined subroutine") and -1 < index($firsterr, $sub)
4436 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
4437 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4442 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4457 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4462 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4474 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
4509 0 0 0 $parent_menu->{'Scroll'}[1] > 1 and not exists $main::maintain_scroll_flag->{$parent_menu}
4556 0 0 0 ref $menu_output eq "ARRAY" and $menu_output->[0] =~ /^[{](.*)[}][<]$/
4589 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
4594 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
4615 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
4620 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
4639 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
4641 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4646 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4661 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4666 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4678 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
4690 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
4695 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
4713 0 0 0 -1 < index($firsterr, "Undefined subroutine") and -1 < index($firsterr, $sub)
4754 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
4755 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4760 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4775 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
4780 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
4792 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
4823 0 0 0 $menu_output[0] ne "-" and $menu_output[0] ne "+"
4875 0 0 0 $numbor and unpack("a1", $numbor) eq "!"
0 0 0 !$ikey || $ikey eq 'ENTER' and $numbor =~ /^()$/ || $numbor =~ /^\n/
4876 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'}
4884 0 0 0 $curscreennum - $remainder == $MenuUnit_hash_ref->{'Scroll'}[1] and $curscreennum == $num_pick
4890 0 0 0 not $remainder and $num_pick == $start + 1 || $num_pick == $start + $display_this_many_items
4907 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'}
4919 0 0 0 $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'}
4935 0 0 0 $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'}
4957 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
4993 0 0 0 $parent_menu and exists $parent_menu->{'Scroll'}
4996 0 0 0 $curscreennum + $display_this_many_items < $parent_menu->{'Scroll'}[1] and $parent_menu->{'Scroll'}[1] < $numpick
5012 0 0 0 exists $MenuUnit_hash_ref->{'Scroll'} and $MenuUnit_hash_ref->{'Scroll'}
5024 0 0 0 keys %picks and $numbor =~ /^[Ff]$/
5037 0 0 0 $Persists->{$MenuUnit_hash_ref}{'defaults'} and not $filtered_menu
5041 0 0 0 exists $picks{$pick} and not $picks{$numbor}
5058 0 0 0 exists $MenuUnit_hash_ref->{'Result'} and not defined $MenuUnit_hash_ref->{'Result'}
5100 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}}
5103 0 0 0 $filtered_menu and exists $SavePick->{$parent_menu}{$numbor}
5109 0 0 0 exists $picks{$pick} and not $picks{$numbor}
5152 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]};}
5176 0 0 0 $prev_menu and $prev_menu != $numbor
5203 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];}
5270 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; } ; } }
5288 0 0 0 $prev_menu and $prev_menu != $numbor
5317 0 0 0 keys %picks and $numbor =~ /^[Ff]$/
5409 0 0 0 ref $menu_output eq "ARRAY" and $menu_output->[0] =~ /^[{](.*)[}][<]$/
5423 0 0 0 $curscreennum < $MenuUnit_hash_ref->{'Scroll'}[1] and $display_this_many_items < $num_pick - $start
5452 0 0 0 $menu_output eq "DONE" and 1 < $recurse_level
5481 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
5486 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
5508 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
5513 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
5533 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
5535 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
5541 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
5556 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
5562 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
5578 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
5590 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
5595 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
5613 0 0 0 -1 < index($firsterr, "Undefined subroutine") and -1 < index($firsterr, $sub)
5665 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
5667 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
5672 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
5687 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
5692 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
5708 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
5721 0 0 0 not $numbor =~ /^[Ff]$/ and exists $picks{$numbor}
5739 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]}
5768 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
5769 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
5774 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
5789 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
5794 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
5806 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
5831 0 0 0 wantarray and not $no_wantarray
5850 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
5855 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
5876 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
5881 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
5901 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
5903 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
5908 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
5923 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
5928 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
5940 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
5952 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
5957 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
5975 0 0 0 -1 < index($firsterr, "Undefined subroutine") and -1 < index($firsterr, $sub)
6016 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
6017 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
6022 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
6037 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
6042 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
6054 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
6078 0 0 0 $test_result =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ && grep({$1 eq $_;} list_module('main', $Term::Menus::fa_code))
6129 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
6130 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
6135 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
6150 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
6155 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
6165 0 0 0 0 == $#resu and ref $resu[0] eq "CODE"
6175 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
6182 0 0 0 keys %{$resu[0];} && $parent_menu
6229 0 0 0 ref $test_item eq "HASH" and grep {/Item_/;} keys %{$test_item;}
6306 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}[}][<]$/
6354 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
6359 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
6377 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
6378 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
6383 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
6398 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
6403 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
6422 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
6434 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
6439 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
6464 0 0 0 -1 < index($firsterr, "Undefined subroutine") and -1 < index($firsterr, $sub)
6521 0 0 0 10 < length $@ and unpack("a11", $@) eq "FATAL ERROR"
6522 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
6527 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
6542 0 0 0 $parent_menu and wantarray
0 0 0 $parent_menu and wantarray and not $no_wantarray
6547 0 0 0 defined $log_handle and -1 < index($log_handle, "*")
6566 0 0 0 0 < $#resu and wantarray
0 0 0 0 < $#resu and wantarray and not $no_wantarray
6610 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
6614 0 0 0 -1 == $#{$Net::FullAuto::FA_Core::makeplan{"Plan"};} and not exists $Net::FullAuto::FA_Core::makeplan->{'Title'}
6645 0 0 0 -1 < index($result_string, "][[") and -1 < index($result_string, "]][")

or 2 conditions

line l !l condition
516 0 0 $fa_global::berkeley_db_path ||= ""
517 0 0 $fa_global::FA_Sudo ||= {}
524 1 0 $Term::Menus::facall ||= ""
582 0 0 $default_modules ||= ""
586 0 0 $default_modules ||= {}
656 0 0 $set ||= ""
660 0 0 $set ||= {}
715 0 0 $A[$acnt] || ''
723 0 0 $A[$acnt] || ''
768 0 0 $set ||= ""
772 0 0 $set ||= {}
856 0 0 $Term::Menus::fa_code->[0] ||= ""
883 0 0 $Term::Menus::fa_conf->[0] ||= ""
907 0 0 $Term::Menus::fa_host->[0] ||= ""
931 0 0 $Term::Menus::fa_menu->[0] ||= ""
1151 0 0 $to ||= 0
1234 0 0 $subfile ||= ""
1271 0 0 $_[1] || ''
1300 0 0 $_[0] || ''
1302 0 0 $_[1] || {}
1303 0 0 $_[2] || ''
1304 0 0 $_[3] || ''
1306 0 0 $_[5] || ''
1307 0 0 $_[6] || {}
1308 0 0 $_[7] || {}
1309 0 0 $_[8] || ''
1310 0 0 $banner ||= ""
1323 0 0 $eval_banner_code ||= sub { }
1410 0 0 $_[1] || ''
1467 0 0 $FullMenu->{$MenuUnit_hash_ref}[11] || 0
1505 0 0 $eval_convey_code ||= sub { }
1659 0 0 $Items{$num}{'Select'} || ''
1706 0 0 $MenuUnit_hash_ref->{'Banner'} || ''
1748 0 0 $MenuUnit_hash_ref->{'Banner'} || ''
1900 0 0 $name ||= ""
1910 0 0 $name ||= ""
1986 0 0 $_[0] || ''
1987 0 0 $_[1] || -1
1988 0 0 $_[2] || ''
1989 0 0 $_[3] || ''
1990 0 0 $_[4] || ''
1991 0 0 $_[5] || ''
1992 0 0 $_[6] || ''
1993 0 0 $_[7] || ''
2042 0 0 $pn->{$numbor}[1] ||= 1
2047 0 0 $$all_menu_items_array[$numbor - 1] || ''
2062 0 0 $menu ||= ""
2083 0 0 $_[0] || ''
2084 0 0 $_[1] || {}
2085 0 0 $_[2] || {}
2086 0 0 $_[3] || ''
2087 0 0 $_[4] || ''
2088 0 0 $_[5] || ''
2089 0 0 $_[6] || ''
2127 0 0 pop @output || ''
2148 0 0 $_[0] || ''
2149 0 0 $_[1] || {}
2150 0 0 $_[2] || ''
2151 0 0 $_[3] || ''
2184 0 0 $_[0] || ''
2186 0 0 $_[2] || ''
2187 0 0 $_[3] || {}
2188 0 0 $_[4] || {}
2189 0 0 $_[5] || ''
2190 0 0 $_[6] || ''
2350 0 0 $_[0] || ''
2351 0 0 $_[1] || ''
2352 0 0 $_[2] || ''
2353 0 0 $_[3] || ''
2354 0 0 $_[4] || ''
2567 0 0 $MenuUnit_hash_ref->{'Select'} ||= {}
2596 0 0 (caller 1)[3] || ''
2705 0 0 (keys %{$_[2];})[0] || 1
2706 0 0 $_[1][$pick - 1] ||= ""
2748 0 0 $test_item ||= ""
3003 0 0 $subfile ||= ""
3119 0 0 $@ || ''
3129 0 0 $@ || ''
3591 0 0 $1 || ''
3697 0 0 $subfile ||= ""
3798 0 0 $@ || ''
3806 0 0 $@ || ''
3907 0 0 $SavePick->{$MenuUnit_hash_ref} ||= {}
3980 0 0 $subfile ||= ""
4081 0 0 $@ || ''
4089 0 0 $@ || ''
4185 0 0 $1 || ''
4293 0 0 $subfile ||= ""
4394 0 0 $@ || ''
4402 0 0 $@ || ''
4507 0 0 $parent_menu->{'Scroll'}[1] ||= 0
4508 0 0 $main::maintain_scroll_flag ||= {}
4611 0 0 $subfile ||= ""
4712 0 0 $@ || ''
4720 0 0 $@ || ''
4954 0 0 $ikey ||= "ENTER"
5003 0 0 $parent_menu->{'Scroll'}[1] ||= 0
5055 0 0 $pn{$numbor}[1] ||= 1
5057 0 0 $all_menu_items_array[0] ||= ""
5100 0 0 (keys %picks)[0] || 1
5209 0 0 (keys %{$FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$digital_numbor - 1] or ""};})[0] or []
5215 0 0 $all_menu_items_array[$digital_numbor - 1] or ""
5310 0 0 $next_menu_ref ||= ""
5504 0 0 $subfile ||= ""
5612 0 0 $@ || ''
5620 0 0 $@ || ''
5872 0 0 $subfile ||= ""
5974 0 0 $@ || ''
5982 0 0 $@ || ''
6228 0 0 $test_item ||= ""
6463 0 0 $@ || ''
6471 0 0 $@ || ''
6585 0 0 (keys %picks)[0] or ""

or 3 conditions

line l !l&&r !l&&!r condition
510 0 0 0 getlogin || getpwuid $<
1311 0 0 0 keys %{$Conveyed;} or $picks_from_parent
1432 0 0 0 defined $_[11] and $_[11] or (caller)[0] ne "Term::Menus" and not wantarray
1700 0 0 0 $select_many or keys %{$$MenuUnit_hash_ref{"Select"};}
1723 0 0 0 $pick eq "-" or $pick eq "+"
1766 0 0 0 $pick eq "-" or $pick eq "+"
1789 0 0 0 $picks_from_parent || keys %{$$MenuUnit_hash_ref{'Select'};}
1798 0 0 0 ref $topmenu eq "HASH" and (keys %{$$topmenu{"Select"};} and $topmenu->{'Select'} eq "Many") or ref $savpick eq "HASH" and exists $topmenu->{'Select'}{(keys %{$savpick;})[0]}
2291 0 0 0 $#newtext == -1 or $#newtext == 0
2402 0 0 0 exists $Conveyed->{$1} or $bang
0 0 0 exists $Conveyed->{$1} or $bang or $test_regx_flag
2466 0 0 0 $text =~ /^&?(\w+)\s*[(]["'].*["'][)]\s*$/ or $replace =~ /^eval /
2496 0 0 0 $text =~ /^&?(?:.*::)*(\w+)\s*[(]["'].*["'][)]\s*$/ or $replace =~ /^eval /
2740 0 0 0 not $convey or ref $convey eq "ARRAY" and $#{$convey;} == -1
2749 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") or ref $test_item eq "CODE"
2754 0 0 0 grep({/Item_/;} keys %{$test_item;}) || $show_banner_only && grep({/Banner/;} keys %{$test_item;})
0 0 0 ref $test_item eq "HASH" and grep({/Item_/;} keys %{$test_item;}) || $show_banner_only && grep({/Banner/;} keys %{$test_item;}) or $test_item =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code)
0 0 0 ref $test_item eq "HASH" and grep({/Item_/;} keys %{$test_item;}) || $show_banner_only && grep({/Banner/;} keys %{$test_item;}) or $test_item =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) or ref $test_item eq "CODE"
0 0 0 ref $test_item eq "HASH" and grep({/Item_/;} keys %{$test_item;}) || $show_banner_only && grep({/Banner/;} keys %{$test_item;}) or $test_item =~ /^&?(?:.*::)*(\w+)\s*[(]?.*[)]?\s*$/ and grep {$1 eq $_;} list_module("main", $Term::Menus::fa_code) or ref $test_item eq "CODE" or &test_hashref($test_item)
2920 0 0 0 $numbor <= $start || $start + $choose_num < $numbor || $numbor eq 'admin'
0 0 0 $numbor =~ /\d+/ and $numbor <= $start || $start + $choose_num < $numbor || $numbor eq 'admin' or $input
2925 0 0 0 $MenuUnit_hash_ref->{'Banner'} || $banner
2954 0 0 0 $select_many || keys %{$$MenuUnit_hash_ref{'Select'};}
2955 0 0 0 $gotmany and $numbor =~ /^[Ff]$/ or $picks{$picknum} ne "+" and $picks{$picknum} ne "-" and not $gotmany
3246 0 0 0 $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]}/
3286 0 0 0 $MenuUnit_hash_ref->{'Scroll'}[1] eq $picknum || $MenuUnit_hash_ref->{'Scroll'}[0] eq $picknum
3310 0 0 0 exists $picks{$picknum} or exists $picks{$picknum_for_display}
0 0 0 $mark =~ /^ +$/ or (exists $picks{$picknum} or exists $picks{$picknum_for_display})
3365 0 0 0 $^O eq "MSWin32" or $^O eq "MSWin64"
3375 0 0 0 $select_many or keys %{${$MenuUnit_hash_ref;}{"Select"};}
3380 0 0 0 $mark_flg == 1 or $Persists->{$MenuUnit_hash_ref}{'defaults'}
3423 0 0 0 $ikey eq "ENTER" or $ikey eq "ESC"
0 0 0 $ikey eq "ENTER" or $ikey eq "ESC" or $ikey eq "UPARROW"
0 0 0 $ikey eq "ENTER" or $ikey eq "ESC" or $ikey eq "UPARROW" or $ikey eq "DOWNARROW"
0 0 0 $ikey eq "ENTER" or $ikey eq "ESC" or $ikey eq "UPARROW" or $ikey eq "DOWNARROW" or $ikey eq "LEFTARROW"
0 0 0 $ikey eq "ENTER" or $ikey eq "ESC" or $ikey eq "UPARROW" or $ikey eq "DOWNARROW" or $ikey eq "LEFTARROW" or $ikey eq "RIGHTARROW"
0 0 0 $ikey eq "ENTER" or $ikey eq "ESC" or $ikey eq "UPARROW" or $ikey eq "DOWNARROW" or $ikey eq "LEFTARROW" or $ikey eq "RIGHTARROW" or $ikey eq "F1"
3459 0 0 0 $Persists->{$MenuUnit_hash_ref}{'defaults'} || $filtered_menu
0 0 0 $numbor =~ /^\
0 0 0 $numbor =~ /^\>/ || $ikey eq 'RIGHTARROW'
0 0 0 grep({/-|\+/;} values %picks) || $show_banner_only
0 0 0 $ikey eq "ESC" or $numbor =~ /^quit|exit|bye$/i
0 0 0 $ikey eq 'F1' || $numbor =~ /^help$/i
0 0 0 $ikey eq "F1" or $numbor =~ /^help$/i
3498 0 0 0 $^O eq "MSWin32" or $^O eq "MSWin64"
3939 0 0 0 $parent_menu || $MenuUnit_hash_ref
4831 0 0 0 $select_many or keys %{$$MenuUnit_hash_ref{"Select"};}
4847 0 0 0 $select_many or exists $FullMenu->{$MenuUnit_hash_ref}[6]{$all_menu_items_array[$pck]}
4875 0 0 0 $numbor =~ /^u$/i or $ikey eq "UPARROW"
0 0 0 $numbor =~ /^u$/i or $ikey eq "UPARROW" or $ikey eq "PAGEUP"
0 0 0 !$ikey || $ikey eq 'ENTER'
0 0 0 $numbor =~ /^()$/ || $numbor =~ /^\n/
0 0 0 !$ikey || $ikey eq 'ENTER' and $numbor =~ /^()$/ || $numbor =~ /^\n/ or $numbor =~ /^d$/i
0 0 0 !$ikey || $ikey eq 'ENTER' and $numbor =~ /^()$/ || $numbor =~ /^\n/ or $numbor =~ /^d$/i or $ikey eq "DOWNARROW"
0 0 0 !$ikey || $ikey eq 'ENTER' and $numbor =~ /^()$/ || $numbor =~ /^\n/ or $numbor =~ /^d$/i or $ikey eq "DOWNARROW" or $ikey eq "PAGEDOWN"
4890 0 0 0 $display_this_many_items < $num_pick - $start or $remainder
0 0 0 $num_pick == $start + 1 || $num_pick == $start + $display_this_many_items
0 0 0 $display_this_many_items < $num_pick - $start or $remainder or not $remainder and $num_pick == $start + 1 || $num_pick == $start + $display_this_many_items
4941 0 0 0 getlogin || getpwuid $<
4957 0 0 0 $ikey eq 'DOWNARROW' || $numbor =~ /^d$/i
5017 0 0 0 $show_banner_only or not $numbor =~ /^\d+/
5024 0 0 0 keys %picks && $numbor =~ /^[Ff]$/ || $numbor =~ /^\d+|admin$/ || $return_from_child_menu
0 0 0 exists $pn{$numbor} or keys %picks and $numbor =~ /^[Ff]$/
5100 0 0 0 $select_many || exists do { $MenuUnit_hash_ref }->{'Select'}{$numbor}
0 0 0 $all_menu_items_array[$digital_numbor - 1] or $all_menu_items_array[$pn{$digital_numbor}[1] - 1]
0 0 0 $show_banner_only and exists $MenuUnit_hash_ref->{'Result'} and ref $MenuUnit_hash_ref->{'Result'} eq "HASH" or $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 $show_banner_only and exists $MenuUnit_hash_ref->{'Result'} and ref $MenuUnit_hash_ref->{'Result'} eq "HASH" or $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" or $numbor =~ /^[Ff]$/ and ref $FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[((keys %picks)[0] || 1) - 1]} eq "HASH"
0 0 0 $select_many || keys %{$$MenuUnit_hash_ref{'Select'};}
0 0 0 $show_banner_only and exists $MenuUnit_hash_ref->{'Result'} and ref $MenuUnit_hash_ref->{'Result'} eq "CODE" or keys %{$$FullMenu{$MenuUnit_hash_ref}[2];} and exists $FullMenu->{$MenuUnit_hash_ref}[2]{$pn{$numbor}[0]}
5209 0 0 0 $show_banner_only or grep {/Item_/;} keys %{$FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$numbor - 1] or $all_menu_items_array[$pn{$numbor}[1] - 1]};}
0 0 0 $show_banner_only or grep {/Item_/;} keys %{$FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$numbor - 1] or $all_menu_items_array[$pn{$numbor}[1] - 1]};} or exists $labels{(keys %{$FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$digital_numbor - 1] or ""};})[0] or []}
0 0 0 $all_menu_items_array[$numbor - 1] or $all_menu_items_array[$pn{$numbor}[1] - 1]
0 0 0 $show_banner_only or grep {/Item_/;} keys %{$FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$numbor - 1] or $all_menu_items_array[$pn{$numbor}[1] - 1]};} or exists $labels{(keys %{$FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$digital_numbor - 1] or ""};})[0] or []} or &test_hashref($FullMenu->{$MenuUnit_hash_ref}[2]{$all_menu_items_array[$numbor - 1] or $all_menu_items_array[$pn{$numbor}[1] - 1]})
5213 0 0 0 $all_menu_items_array[$numbor - 1] or $all_menu_items_array[$pn{$numbor}[1] - 1]
5316 0 0 0 $select_many or exists do { $MenuUnit_hash_ref }->{'Select'}{$numbor}
6095 0 0 0 $trim_look =~ /Item_/s || $trim_look =~ /[']Result['][,]/s
0 0 0 not $trim_look =~ /Item_/s || $trim_look =~ /[']Result['][,]/s or $trim_look =~ /=\s*[']Item_/s
0 0 0 not $trim_look =~ /Item_/s || $trim_look =~ /[']Result['][,]/s or $trim_look =~ /=\s*[']Item_/s or $look_at_test_result =~ /$tspmi_regex/
0 0 0 not $trim_look =~ /Item_/s || $trim_look =~ /[']Result['][,]/s or $trim_look =~ /=\s*[']Item_/s or $look_at_test_result =~ /$tspmi_regex/ or $trim_look =~ /$sicm_regex/
0 0 0 not $trim_look =~ /Item_/s || $trim_look =~ /[']Result['][,]/s or $trim_look =~ /=\s*[']Item_/s or $look_at_test_result =~ /$tspmi_regex/ or $trim_look =~ /$sicm_regex/ or $trim_look =~ /$tbii_regex/
6229 0 0 0 ref $test_item eq "HASH" and grep {/Item_/;} keys %{$test_item;} or $show_banner_only
6585 0 0 0 $select_many or exists do { $MenuUnit_hash_ref }->{'Select'}{(keys %picks)[0] or ""}