| line |
true |
false |
branch |
|
260
|
0 |
0 |
if exists $_keynames{$sequence} |
|
267
|
12 |
16 |
if length $name == 1 and $name =~ /^[[:graph:] ]$/ |
|
269
|
16 |
0 |
if exists $keynames{$name} |
|
301
|
0 |
76 |
unless defined $value |
|
304
|
2 |
74 |
if ($attrib eq '_width') |
|
305
|
0 |
2 |
if $value > 0 and $value < $$self{'_term_width'} |
|
308
|
2 |
72 |
if ($attrib eq '_height') |
|
309
|
0 |
2 |
if $value > 0 and $value < $$self{'_term_height'} |
|
312
|
3 |
69 |
if ($attrib =~ /^_space_after_/) |
|
313
|
3 |
0 |
if $value =~ /^(?:\-|\+|0|1|NO|N|YES|Y|FALSE|F|TRUE|T)$/i |
|
316
|
1 |
68 |
if ($attrib eq '_spacious_items') |
|
317
|
1 |
0 |
if $value =~ /^(?:\-|\+|0|1|NO|N|YES|Y|FALSE|F|TRUE|T)$/i |
|
320
|
1 |
67 |
if ($attrib eq '_cursor') |
|
321
|
1 |
0 |
if $value =~ /^(?:\-|\+|0|1|NO|N|YES|Y|FALSE|F|TRUE|T)$/i |
|
324
|
1 |
66 |
if ($attrib eq '_cursor_char') |
|
325
|
1 |
0 |
if $value =~ /^[[:graph:] ]$/ |
|
328
|
1 |
65 |
if ($attrib eq '_selection') |
|
329
|
1 |
0 |
if $value =~ /^\d+$/ and $value <= scalar @{$$self{'_items'};} |
|
332
|
1 |
64 |
if ($attrib eq '_selection_wrap') |
|
333
|
1 |
0 |
if $value =~ /^(?:\-|\+|0|1|NO|N|YES|Y|FALSE|F|TRUE|T)$/i |
|
336
|
1 |
63 |
if ($attrib eq '_help') |
|
337
|
0 |
1 |
unless ref $value eq 'ARRAY' |
|
339
|
2 |
0 |
if (defined $help) |
|
340
|
0 |
2 |
unless ref $help eq 'ARRAY' |
|
341
|
2 |
0 |
if (defined $$help[0]) |
|
342
|
0 |
2 |
unless $$help[0] =~ /^[[:graph:] ]*$/ |
|
344
|
2 |
0 |
if (defined $$help[1]) |
|
345
|
0 |
2 |
unless ref $$help[1] eq 'CODE' |
|
352
|
10 |
53 |
if ($attrib =~ /_keys$/) |
|
353
|
0 |
10 |
unless ref $value eq 'ARRAY' |
|
355
|
0 |
22 |
unless $self->_is_keyname($arg) |
|
360
|
2 |
51 |
if ($attrib eq '_items') |
|
361
|
0 |
2 |
unless ref $value eq 'ARRAY' |
|
363
|
0 |
6 |
unless ref $item eq 'ARRAY' |
|
364
|
0 |
6 |
unless defined $$item[0] and $self->_is_keyname($$item[0]) |
|
365
|
0 |
6 |
unless defined $$item[1] and $$item[1] =~ /^[[:graph:] ]*$/ |
|
366
|
4 |
2 |
if (defined $$item[2]) |
|
367
|
0 |
4 |
unless ref $$item[2] eq 'CODE' |
|
373
|
4 |
47 |
if ($attrib =~ /_fill$/) |
|
374
|
4 |
0 |
if $value =~ /^(?:\-|\+|0|1|NO|N|YES|Y|FALSE|F|TRUE|T)$/i |
|
377
|
2 |
45 |
if ($attrib =~ /_(?:leader|trailer)$/) |
|
378
|
2 |
0 |
if $value =~ /^(?:\-|\+|0|1|NO|N|YES|Y|FALSE|F|TRUE|T)$/i |
|
381
|
4 |
41 |
if ($attrib =~ /_(?:pre|post)fix$/) |
|
382
|
2 |
2 |
if ($value =~ /^ *(?:HOR|VER|ULC|URC|LRC|LLC|LTE|RTE|TTE|BTE|CTE) *$/) { } |
|
|
2 |
0 |
elsif ($value =~ /^[[:graph:] ]*$/) { } |
|
390
|
3 |
38 |
if ($attrib =~ /_delimiter$/) |
|
391
|
3 |
0 |
if ($value =~ /^(?:HOR|VER|ULC|URC|LRC|LLC|LTE|RTE|TTE|BTE|CTE)$/) { } |
|
|
0 |
0 |
elsif ($value =~ /^[[:graph:] ]?$/) { } |
|
399
|
3 |
35 |
if ($attrib =~ /^_(?:prompt|status|title)$/) |
|
400
|
3 |
0 |
if $value =~ /^[[:graph:] ]*$/ |
|
403
|
4 |
31 |
if ($attrib =~ /_align$/) |
|
404
|
4 |
0 |
if $value =~ /^(?:LEFT|RIGHT|CENTER)$/i |
|
407
|
4 |
27 |
if ($attrib =~ /_frame$/) |
|
408
|
4 |
0 |
if $value =~ /^(?:\-|\+|0|1|NO|N|YES|Y|FALSE|F|TRUE|T)$/i |
|
411
|
4 |
23 |
if ($attrib =~ /_frame_style$/) |
|
412
|
0 |
4 |
unless ref $value eq 'ARRAY' |
|
414
|
0 |
4 |
unless $arg =~ /^(?:BLINK|REVERSE|BOLD|CLEAR)$/i |
|
419
|
5 |
18 |
if ($attrib =~ /_style$/) |
|
420
|
0 |
5 |
unless ref $value eq 'ARRAY' |
|
422
|
0 |
5 |
unless $arg =~ /^(?:BLINK|REVERSE|BOLD|UNDERLINE|CLEAR)$/i |
|
427
|
18 |
0 |
if ($attrib =~ /_[fb]gcolor$/) { } |
|
428
|
18 |
0 |
if $value =~ /^(?:BLACK|RED|GREEN|YELLOW|BLUE|MAGENTA|CYAN|WHITE)$/i |
|
442
|
0 |
0 |
if ($str =~ /^( *)(?:HOR|VER|ULC|URC|LRC|LLC|LTE|RTE|TTE|BTE|CTE)( *)$/) { } |
|
454
|
0 |
0 |
if ($str =~ /^( *)(HOR|VER|ULC|URC|LRC|LLC|LTE|RTE|TTE|BTE|CTE)( *)$/) { } |
|
467
|
0 |
0 |
if $fgcolor |
|
468
|
0 |
0 |
if ($bgcolor) |
|
478
|
0 |
0 |
if $style |
|
486
|
0 |
0 |
if (length $self->title > 0) |
|
488
|
0 |
0 |
if $self->title_frame |
|
489
|
0 |
0 |
if $self->space_after_title |
|
498
|
0 |
0 |
if ($self->item_count > 0) |
|
499
|
0 |
0 |
if $self->leader and not $self->item_frame |
|
500
|
0 |
0 |
if $self->item_frame |
|
502
|
0 |
0 |
if $self->item_frame and $self->spacious_items and $self->item_count > 1 |
|
503
|
0 |
0 |
if $self->trailer and not $self->item_frame |
|
504
|
0 |
0 |
if $self->space_after_items |
|
513
|
0 |
0 |
if (length $self->status > 0) |
|
515
|
0 |
0 |
if $self->status_frame |
|
516
|
0 |
0 |
if $self->space_after_status |
|
525
|
0 |
0 |
if $self->prompt_frame |
|
527
|
0 |
0 |
if $self->prompt_frame |
|
529
|
0 |
0 |
if $prompt_length > $max_length |
|
531
|
0 |
0 |
if $padding < 0 |
|
533
|
0 |
0 |
if ($self->prompt_fill) { } |
|
534
|
0 |
0 |
if ($self->prompt_align eq 'CENTER') { } |
|
|
0 |
0 |
elsif ($self->prompt_align eq 'RIGHT') { } |
|
537
|
0 |
0 |
if $self->prompt_frame |
|
541
|
0 |
0 |
if $self->prompt_frame |
|
545
|
0 |
0 |
if $self->prompt_frame |
|
550
|
0 |
0 |
if $self->prompt_frame |
|
565
|
0 |
0 |
if (defined $hint and $self->_check_value('_status', $hint)) |
|
567
|
0 |
0 |
if $self->status |
|
568
|
0 |
0 |
if $self->prompt |
|
591
|
2 |
68 |
unless $self->_check_mode($attrib, 'w') |
|
593
|
0 |
68 |
if (exists $args{$arg}) { } |
|
|
0 |
68 |
elsif ($caller_is_obj) { } |
|
594
|
0 |
0 |
if ($self->_check_value($attrib, $args{$arg})) { } |
|
608
|
1 |
0 |
unless $self->_check_value('_width', $$self{'_width'}) |
|
609
|
1 |
0 |
unless $self->_check_value('_height', $$self{'_height'}) |
|
641
|
1 |
0 |
if ($width) |
|
642
|
0 |
1 |
if ($self->_check_value('_width', $width)) { } |
|
655
|
1 |
0 |
if ($height) |
|
656
|
0 |
1 |
if ($self->_check_value('_height', $height)) { } |
|
669
|
1 |
0 |
if (defined $space) |
|
670
|
1 |
0 |
if ($self->_check_value('_space_after_title', $space)) { } |
|
671
|
1 |
0 |
if ($space =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
688
|
1 |
0 |
if (defined $space) |
|
689
|
1 |
0 |
if ($self->_check_value('_space_after_items', $space)) { } |
|
690
|
1 |
0 |
if ($space =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
707
|
1 |
0 |
if (defined $space) |
|
708
|
1 |
0 |
if ($self->_check_value('_space_after_status', $space)) { } |
|
709
|
1 |
0 |
if ($space =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
726
|
1 |
0 |
if (defined $space) |
|
727
|
1 |
0 |
if ($self->_check_value('_spacious_items', $space)) { } |
|
728
|
1 |
0 |
if ($space =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
745
|
1 |
0 |
if (defined $cursor) |
|
746
|
1 |
0 |
if ($self->_check_value('_cursor', $cursor)) { } |
|
747
|
1 |
0 |
if ($cursor =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
764
|
1 |
0 |
if ($char) |
|
765
|
1 |
0 |
if ($self->_check_value('_cursor_char', $char)) { } |
|
778
|
2 |
1 |
if ($keys) |
|
779
|
2 |
0 |
if (ref $keys eq 'ARRAY') { } |
|
780
|
2 |
0 |
if ($self->_check_value('_up_keys', $keys)) { } |
|
791
|
1 |
2 |
wantarray ? : |
|
797
|
2 |
1 |
if ($keys) |
|
798
|
2 |
0 |
if (ref $keys eq 'ARRAY') { } |
|
799
|
2 |
0 |
if ($self->_check_value('_down_keys', $keys)) { } |
|
810
|
1 |
2 |
wantarray ? : |
|
816
|
1 |
0 |
if ($help) |
|
817
|
1 |
0 |
if (ref $help eq 'ARRAY') { } |
|
818
|
1 |
0 |
if ($self->_check_value('_help', $help)) { } |
|
829
|
0 |
1 |
wantarray ? : |
|
835
|
2 |
1 |
if ($keys) |
|
836
|
2 |
0 |
if (ref $keys eq 'ARRAY') { } |
|
837
|
2 |
0 |
if ($self->_check_value('_help_keys', $keys)) { } |
|
848
|
1 |
2 |
wantarray ? : |
|
854
|
2 |
1 |
if ($keys) |
|
855
|
2 |
0 |
if (ref $keys eq 'ARRAY') { } |
|
856
|
2 |
0 |
if ($self->_check_value('_exit_keys', $keys)) { } |
|
867
|
1 |
2 |
wantarray ? : |
|
873
|
1 |
0 |
if (defined $sel) |
|
874
|
1 |
0 |
if ($self->_check_value('_selection', $sel)) { } |
|
887
|
1 |
0 |
if (defined $wrap) |
|
888
|
1 |
0 |
if ($self->_check_value('_selection_wrap', $wrap)) { } |
|
889
|
1 |
0 |
if ($wrap =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
906
|
2 |
1 |
if ($keys) |
|
907
|
2 |
0 |
if (ref $keys eq 'ARRAY') { } |
|
908
|
2 |
0 |
if ($self->_check_value('_selection_keys', $keys)) { } |
|
919
|
1 |
2 |
wantarray ? : |
|
925
|
1 |
0 |
if ($styles) |
|
926
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
927
|
1 |
0 |
if ($self->_check_value('_selection_style', $styles)) { } |
|
941
|
0 |
1 |
wantarray ? : |
|
947
|
1 |
0 |
if ($fgcolor) |
|
948
|
1 |
0 |
if ($self->_check_value('_selection_fgcolor', $fgcolor)) { } |
|
961
|
1 |
0 |
if ($bgcolor) |
|
962
|
1 |
0 |
if ($self->_check_value('_selection_bgcolor', $bgcolor)) { } |
|
975
|
1 |
0 |
if (defined $leader) |
|
976
|
1 |
0 |
if ($self->_check_value('_leader', $leader)) { } |
|
977
|
0 |
1 |
if ($leader =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
994
|
1 |
0 |
if (defined $trailer) |
|
995
|
1 |
0 |
if ($self->_check_value('_trailer', $trailer)) { } |
|
996
|
0 |
1 |
if ($trailer =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1013
|
1 |
0 |
if (defined $prefix) |
|
1014
|
1 |
0 |
if ($self->_check_value('_shortcut_prefix', $prefix)) { } |
|
1027
|
1 |
0 |
if (defined $postfix) |
|
1028
|
1 |
0 |
if ($self->_check_value('_shortcut_postfix', $postfix)) { } |
|
1041
|
1 |
0 |
if (defined $del) |
|
1042
|
1 |
0 |
if ($self->_check_value('_delimiter', $del)) { } |
|
1055
|
1 |
0 |
if (defined $del) |
|
1056
|
1 |
0 |
if ($self->_check_value('_leader_delimiter', $del)) { } |
|
1069
|
1 |
0 |
if (defined $del) |
|
1070
|
1 |
0 |
if ($self->_check_value('_trailer_delimiter', $del)) { } |
|
1083
|
1 |
0 |
if (defined $prefix) |
|
1084
|
1 |
0 |
if ($self->_check_value('_label_prefix', $prefix)) { } |
|
1097
|
1 |
0 |
if (defined $postfix) |
|
1098
|
1 |
0 |
if ($self->_check_value('_label_postfix', $postfix)) { } |
|
1111
|
1 |
0 |
if (defined $title) |
|
1112
|
1 |
0 |
if ($self->_check_value('_title', $title)) { } |
|
1125
|
1 |
0 |
if ($styles) |
|
1126
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
1127
|
1 |
0 |
if ($self->_check_value('_title_style', $styles)) { } |
|
1141
|
0 |
1 |
wantarray ? : |
|
1147
|
1 |
0 |
if ($fgcolor) |
|
1148
|
1 |
0 |
if ($self->_check_value('_title_fgcolor', $fgcolor)) { } |
|
1161
|
1 |
0 |
if ($bgcolor) |
|
1162
|
1 |
0 |
if ($self->_check_value('_title_bgcolor', $bgcolor)) { } |
|
1175
|
1 |
0 |
if ($align) |
|
1176
|
1 |
0 |
if ($self->_check_value('_title_align', $align)) { } |
|
1189
|
1 |
0 |
if (defined $fill) |
|
1190
|
1 |
0 |
if ($self->_check_value('_title_fill', $fill)) { } |
|
1191
|
1 |
0 |
if ($fill =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1208
|
1 |
0 |
if (defined $frame) |
|
1209
|
1 |
0 |
if ($self->_check_value('_title_frame', $frame)) { } |
|
1210
|
1 |
0 |
if ($frame =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1227
|
1 |
0 |
if ($styles) |
|
1228
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
1229
|
1 |
0 |
if ($self->_check_value('_title_frame_style', $styles)) { } |
|
1243
|
0 |
1 |
wantarray ? : |
|
1249
|
1 |
0 |
if ($fgcolor) |
|
1250
|
1 |
0 |
if ($self->_check_value('_title_frame_fgcolor', $fgcolor)) { } |
|
1263
|
1 |
0 |
if ($bgcolor) |
|
1264
|
1 |
0 |
if ($self->_check_value('_title_frame_bgcolor', $bgcolor)) { } |
|
1277
|
2 |
6 |
if ($items) |
|
1278
|
2 |
0 |
if (ref $items eq 'ARRAY') { } |
|
1279
|
2 |
0 |
if ($self->_check_value('_items', $items)) { } |
|
1290
|
0 |
8 |
wantarray ? : |
|
1296
|
1 |
0 |
if ($styles) |
|
1297
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
1298
|
1 |
0 |
if ($self->_check_value('_item_style', $styles)) { } |
|
1312
|
0 |
1 |
wantarray ? : |
|
1318
|
1 |
0 |
if ($fgcolor) |
|
1319
|
1 |
0 |
if ($self->_check_value('_item_fgcolor', $fgcolor)) { } |
|
1332
|
1 |
0 |
if ($bgcolor) |
|
1333
|
1 |
0 |
if ($self->_check_value('_item_bgcolor', $bgcolor)) { } |
|
1346
|
1 |
0 |
if ($align) |
|
1347
|
1 |
0 |
if ($self->_check_value('_item_align', $align)) { } |
|
1360
|
1 |
0 |
if (defined $fill) |
|
1361
|
1 |
0 |
if ($self->_check_value('_item_fill', $fill)) { } |
|
1362
|
1 |
0 |
if ($fill =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1379
|
1 |
0 |
if (defined $frame) |
|
1380
|
1 |
0 |
if ($self->_check_value('_item_frame', $frame)) { } |
|
1381
|
1 |
0 |
if ($frame =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1398
|
1 |
0 |
if ($styles) |
|
1399
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
1400
|
1 |
0 |
if ($self->_check_value('_item_frame_style', $styles)) { } |
|
1414
|
0 |
1 |
wantarray ? : |
|
1420
|
1 |
0 |
if ($fgcolor) |
|
1421
|
1 |
0 |
if ($self->_check_value('_item_frame_fgcolor', $fgcolor)) { } |
|
1434
|
1 |
0 |
if ($bgcolor) |
|
1435
|
1 |
0 |
if ($self->_check_value('_item_frame_bgcolor', $bgcolor)) { } |
|
1448
|
1 |
0 |
if (defined $status) |
|
1449
|
1 |
0 |
if ($self->_check_value('_status', $status)) { } |
|
1462
|
1 |
0 |
if ($styles) |
|
1463
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
1464
|
1 |
0 |
if ($self->_check_value('_status_style', $styles)) { } |
|
1478
|
0 |
1 |
wantarray ? : |
|
1484
|
1 |
0 |
if ($fgcolor) |
|
1485
|
1 |
0 |
if ($self->_check_value('_status_fgcolor', $fgcolor)) { } |
|
1498
|
1 |
0 |
if ($bgcolor) |
|
1499
|
1 |
0 |
if ($self->_check_value('_status_bgcolor', $bgcolor)) { } |
|
1512
|
1 |
0 |
if ($align) |
|
1513
|
1 |
0 |
if ($self->_check_value('_status_align', $align)) { } |
|
1526
|
1 |
0 |
if (defined $fill) |
|
1527
|
1 |
0 |
if ($self->_check_value('_status_fill', $fill)) { } |
|
1528
|
1 |
0 |
if ($fill =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1545
|
1 |
0 |
if (defined $frame) |
|
1546
|
1 |
0 |
if ($self->_check_value('_status_frame', $frame)) { } |
|
1547
|
0 |
1 |
if ($frame =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1564
|
1 |
0 |
if ($styles) |
|
1565
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
1566
|
1 |
0 |
if ($self->_check_value('_status_frame_style', $styles)) { } |
|
1580
|
0 |
1 |
wantarray ? : |
|
1586
|
1 |
0 |
if ($fgcolor) |
|
1587
|
1 |
0 |
if ($self->_check_value('_status_frame_fgcolor', $fgcolor)) { } |
|
1600
|
1 |
0 |
if ($bgcolor) |
|
1601
|
1 |
0 |
if ($self->_check_value('_status_frame_bgcolor', $bgcolor)) { } |
|
1614
|
1 |
0 |
if (defined $prompt) |
|
1615
|
1 |
0 |
if ($self->_check_value('_prompt', $prompt)) { } |
|
1628
|
1 |
0 |
if ($styles) |
|
1629
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
1630
|
1 |
0 |
if ($self->_check_value('_prompt_style', $styles)) { } |
|
1644
|
0 |
1 |
wantarray ? : |
|
1650
|
1 |
0 |
if ($fgcolor) |
|
1651
|
1 |
0 |
if ($self->_check_value('_prompt_fgcolor', $fgcolor)) { } |
|
1664
|
1 |
0 |
if ($bgcolor) |
|
1665
|
1 |
0 |
if ($self->_check_value('_prompt_bgcolor', $bgcolor)) { } |
|
1678
|
1 |
0 |
if ($align) |
|
1679
|
1 |
0 |
if ($self->_check_value('_prompt_align', $align)) { } |
|
1692
|
1 |
0 |
if (defined $fill) |
|
1693
|
1 |
0 |
if ($self->_check_value('_prompt_fill', $fill)) { } |
|
1694
|
1 |
0 |
if ($fill =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1711
|
1 |
0 |
if (defined $frame) |
|
1712
|
1 |
0 |
if ($self->_check_value('_prompt_frame', $frame)) { } |
|
1713
|
1 |
0 |
if ($frame =~ /^(?:\+|1|YES|Y|TRUE|T)$/i) { } |
|
1730
|
1 |
0 |
if ($styles) |
|
1731
|
1 |
0 |
if (ref $styles eq 'ARRAY') { } |
|
1732
|
1 |
0 |
if ($self->_check_value('_prompt_frame_style', $styles)) { } |
|
1746
|
0 |
1 |
wantarray ? : |
|
1752
|
1 |
0 |
if ($fgcolor) |
|
1753
|
1 |
0 |
if ($self->_check_value('_prompt_frame_fgcolor', $fgcolor)) { } |
|
1766
|
1 |
0 |
if ($bgcolor) |
|
1767
|
1 |
0 |
if ($self->_check_value('_prompt_frame_bgcolor', $bgcolor)) { } |
|
1787
|
0 |
0 |
if ($char eq "\e") { } |
|
|
0 |
0 |
elsif ($self->_get_keyname($char)) { } |
|
|
0 |
0 |
elsif ($char =~ /^[[:graph:]]$/) { } |
|
1790
|
0 |
0 |
if ($char eq '[') { } |
|
|
0 |
0 |
elsif ($char eq 'O') { } |
|
|
0 |
0 |
elsif ($char =~ /[a-z]/) { } |
|
1792
|
0 |
0 |
if ($char =~ /[ABCDFH]/) { } |
|
|
0 |
0 |
elsif ($char eq '[') { } |
|
|
0 |
0 |
elsif ($char =~ /^\d$/) { } |
|
1798
|
0 |
0 |
if ($char =~ /[ABCDE]/) |
|
1816
|
0 |
0 |
if ($char =~ /[ABCDFHPQRS]/) |
|
1841
|
0 |
0 |
unless defined $n |
|
1842
|
0 |
0 |
if ($n =~ /^\d+$/) |
|
1852
|
0 |
0 |
unless defined $n |
|
1853
|
0 |
0 |
if ($n =~ /^\d+$/) |
|
1863
|
0 |
0 |
unless defined $n |
|
1864
|
0 |
0 |
if ($n =~ /^\d+$/) |
|
1874
|
0 |
0 |
unless defined $n |
|
1875
|
0 |
0 |
if ($n =~ /^\d+$/) |
|
1885
|
0 |
0 |
unless defined $t and $t <= $self->height |
|
1886
|
0 |
0 |
unless defined $b and $b <= $self->height |
|
1887
|
0 |
0 |
if ($b >= $t) |
|
1897
|
0 |
0 |
unless defined $l and $l > 0 and $l <= $self->height |
|
1898
|
0 |
0 |
unless defined $c and $c > 0 and $c <= $self->width |
|
1899
|
0 |
0 |
if ($l =~ /^\d+$/ and $c =~ /^\d+$/) |
|
1912
|
0 |
0 |
if $self->title_frame |
|
1914
|
0 |
0 |
if length $title > $max_length |
|
1915
|
0 |
0 |
if ($self->title_fill) |
|
1916
|
0 |
0 |
if ($self->title_align eq 'CENTER') { } |
|
|
0 |
0 |
elsif ($self->title_align eq 'RIGHT') { } |
|
1929
|
0 |
0 |
if ($self->title_frame) |
|
1943
|
0 |
0 |
if ($self->title_frame) |
|
1960
|
0 |
0 |
if (defined $selected) |
|
1961
|
0 |
0 |
if $self->_check_value('_selection', $selected) |
|
1965
|
0 |
0 |
if ($self->item_frame) { } |
|
|
0 |
0 |
elsif ($self->delimiter) { } |
|
1974
|
0 |
0 |
if length $$item[0] > $key_length |
|
1975
|
0 |
0 |
if length $$item[1] > $desc_length |
|
1982
|
0 |
0 |
if ($key_length + $label_length > $max_length or $self->item_fill) |
|
1989
|
0 |
0 |
if $self->selection > 0 and $self->selection <= $last_item + 1 |
|
1993
|
0 |
0 |
if ($i == 0) |
|
1994
|
0 |
0 |
if ($self->item_frame) { } |
|
|
0 |
0 |
elsif ($self->leader) { } |
|
2011
|
0 |
0 |
if $self->delimiter |
|
2017
|
0 |
0 |
if ($self->item_frame) |
|
2024
|
0 |
0 |
if ($highlight and $i == $self->selection - 1) { } |
|
2032
|
0 |
0 |
if $self->shortcut_prefix |
|
2034
|
0 |
0 |
if (length $$item[0] < $key_length) |
|
2037
|
0 |
0 |
if $self->shortcut_postfix |
|
2038
|
0 |
0 |
if ($self->item_frame) { } |
|
|
0 |
0 |
elsif ($self->delimiter) { } |
|
2042
|
0 |
0 |
if ($self->spacious_items) { } |
|
2046
|
0 |
0 |
if ($self->delimiter) { } |
|
2058
|
0 |
0 |
if ($highlight and $i == $self->selection - 1) { } |
|
2066
|
0 |
0 |
if ($self->label_prefix) |
|
2070
|
0 |
0 |
if (length $$item[1] > $desc_length) { } |
|
|
0 |
0 |
elsif (length $$item[1] < $desc_length) { } |
|
2074
|
0 |
0 |
if ($self->item_fill) { } |
|
2075
|
0 |
0 |
if ($self->item_align eq 'CENTER') { } |
|
|
0 |
0 |
elsif ($self->item_align eq 'RIGHT') { } |
|
2095
|
0 |
0 |
if ($self->label_postfix) |
|
2098
|
0 |
0 |
if ($self->item_frame) |
|
2105
|
0 |
0 |
if ($i < $last_item and $self->spacious_items) |
|
2106
|
0 |
0 |
if ($self->item_frame) |
|
2115
|
0 |
0 |
if ($i == $last_item) |
|
2116
|
0 |
0 |
if ($self->item_frame) { } |
|
|
0 |
0 |
elsif ($self->trailer) { } |
|
2133
|
0 |
0 |
if $self->delimiter |
|
2149
|
0 |
0 |
if (defined $text and length $text > 0) { } |
|
2156
|
0 |
0 |
if $self->status_frame |
|
2158
|
0 |
0 |
if length $status > $max_length |
|
2159
|
0 |
0 |
if ($self->status_fill) |
|
2160
|
0 |
0 |
if ($self->status_align eq 'CENTER') { } |
|
|
0 |
0 |
elsif ($self->status_align eq 'RIGHT') { } |
|
2173
|
0 |
0 |
if ($self->status_frame) |
|
2187
|
0 |
0 |
if ($self->status_frame) |
|
2206
|
0 |
0 |
if $self->prompt_frame |
|
2208
|
0 |
0 |
if $padding < 0 |
|
2212
|
0 |
0 |
if length $self->prompt > $max_length |
|
2213
|
0 |
0 |
if ($self->prompt_fill) |
|
2214
|
0 |
0 |
if ($self->prompt_align eq 'CENTER') |
|
2220
|
0 |
0 |
if ($self->prompt_frame) |
|
2226
|
0 |
0 |
if ($self->prompt_fill) |
|
2236
|
0 |
0 |
if ($self->prompt_fill) { } |
|
2237
|
0 |
0 |
if ($self->prompt_align eq 'CENTER') { } |
|
|
0 |
0 |
elsif ($self->prompt_align eq 'RIGHT') { } |
|
2254
|
0 |
0 |
if ($self->prompt_frame) |
|
2262
|
0 |
0 |
if ($self->prompt_fill) |
|
2278
|
0 |
0 |
if ($self->cursor and $self->prompt) { } |
|
2314
|
1 |
0 |
if $key eq $up_key |
|
2323
|
1 |
0 |
if $key eq $down_key |
|
2332
|
1 |
0 |
if $key eq $help_key |
|
2341
|
1 |
2 |
if $key eq $exit_key |
|
2350
|
1 |
1 |
if $key eq $selection_key |
|
2361
|
1 |
2 |
if $key eq $items[$i - 1][0] |
|
2374
|
0 |
1 |
wantarray ? : |
|
2389
|
0 |
0 |
if (defined $offset and $offset =~ /^[+-]?\d+/) |
|
2390
|
0 |
0 |
if (abs $offset > $self->item_count) |
|
2394
|
0 |
0 |
if ($new_sel > $self->item_count) { } |
|
|
0 |
0 |
elsif ($new_sel == 0) { } |
|
|
0 |
0 |
elsif ($new_sel < 0) { } |
|
2395
|
0 |
0 |
$self->selection_wrap ? : |
|
2398
|
0 |
0 |
$self->selection_wrap ? : |
|
2401
|
0 |
0 |
$self->selection_wrap ? : |
|
2407
|
0 |
0 |
if (defined $help[$new_sel][0] and length $help[$new_sel][0] > 0) { } |
|
2421
|
0 |
0 |
if $$item[0] eq $shortcut |
|
2431
|
0 |
0 |
unless defined $key |
|
2432
|
0 |
0 |
if ($self->is_exit_key($key)) |
|
2435
|
0 |
0 |
if ($self->is_up_key($key)) |
|
2439
|
0 |
0 |
if ($self->is_down_key($key)) |
|
2443
|
0 |
0 |
if ($self->is_selection_key($key) and $self->selection > 0) |
|
2444
|
0 |
0 |
if (defined $self->items->[$self->selection - 1][2]) |
|
2449
|
0 |
0 |
if ($self->is_help_key($key)) |
|
2451
|
0 |
0 |
if ($self->help->[$self->selection]) { } |
|
|
0 |
0 |
elsif ($help[0]) { } |
|
2459
|
0 |
0 |
if (my $sel = $self->is_shortcut($key)) |
|
2461
|
0 |
0 |
if (defined $self->items->[$sel - 1][2]) |
|
2464
|
0 |
0 |
if (defined $self->help->[$sel][0] and length $self->help->[$sel][0] > 0) { } |
|
2487
|
0 |
0 |
if (defined $$ref[1]) { } |
|
|
0 |
0 |
elsif (defined $$ref[0] and length $$ref[0] > 0) { } |
|
2501
|
0 |
0 |
if (length $self->title > 0) |
|
2503
|
0 |
0 |
if $self->space_after_title |
|
2505
|
0 |
0 |
if ($self->item_count > 0) |
|
2507
|
0 |
0 |
if $self->space_after_items |
|
2509
|
0 |
0 |
if (length $self->status > 0) |
|
2511
|
0 |
0 |
if $self->space_after_status |
|
2513
|
0 |
0 |
if (length $self->prompt > 0) { } |
|
2524
|
0 |
0 |
if (defined $status and $self->_check_value('_status', $status)) |
|
2528
|
0 |
0 |
if $self->status |
|
2529
|
0 |
0 |
if $self->prompt |
|
2536
|
0 |
0 |
if (defined $prompt and $self->_check_value('_prompt', $prompt)) |
|
2540
|
0 |
0 |
if $self->status |
|
2541
|
0 |
0 |
if $self->prompt |
|
2549
|
0 |
0 |
if (length $self->status > 0) |
|
2551
|
0 |
0 |
if $self->status_frame |
|
2552
|
0 |
0 |
if $self->space_after_status |
|
2554
|
0 |
0 |
if (length $self->prompt > 0) |
|
2556
|
0 |
0 |
if $self->prompt_frame |