Lines Matching refs:show

117     my $show = q(
118                  sub show {
126     eval $show or die $@; # We don't expect this sub definition to fail.
157                 qq{\$a = "$_->[1]"; \$b = show \$a}, qr/^>$_->[2]<$/],
159                 qq(no utf8; \$a = "$_->[1]"; \$b = show \$a), qr/^>$_->[2]<$/],
161                 qq(use utf8; \$a = "$_->[1]"; \$b = show \$a), qr/^>$_->[0]<$/],
178 	print P $show, $prog, '; print $b'
211             my \$b = show keys %h; \$b .= 'F' unless \$h{$_->[3]}; \$b),
215             my \$b = show keys %h; \$b .= 'F' unless \$h{$_->[3]}; \$b),
219             my \$b = show keys %h; \$b .= 'F' unless \$h{chr $_->[0]}; \$b),
224             my \$b = show keys %h; \$b .= 'F' unless \$h{$_->[3]}; \$b),
228             my \$b = show keys %h; \$b .= 'F' unless \$h{$_->[3]}; \$b),
232             my \$b = show keys %h; \$b .= 'F' unless \$h{chr $_->[0]}; \$b),
237             my \$b = show keys %h; \$b .= 'F' unless \$h{$_->[3]}; \$b),
241             my \$b = show keys %h; \$b .= 'F' unless \$h{$_->[3]}; \$b),
245             my \$b = show keys %h; \$b .= 'F' unless \$h{chr $_->[0]}; \$b),
250             my \$b = show keys %h; \$b .= 'F' unless \$h{$_->[3]}; \$b),
254             my \$b = show keys %h; \$b .= 'F' unless \$h{$_->[3]}; \$b),
258             my \$b = show keys %h; \$b .= 'F' unless \$h{chr $_->[0]}; \$b),