hueg.pl: fix warning, syntax
This commit is contained in:
parent
5042035721
commit
a73335f169
166
scripts/hueg.pl
166
scripts/hueg.pl
@ -145,8 +145,8 @@ sub process {
|
|||||||
for $l (@s2) { #each letter
|
for $l (@s2) { #each letter
|
||||||
$all .= "$c3 \cO";
|
$all .= "$c3 \cO";
|
||||||
|
|
||||||
if($flip) { $cur = "$db{$l}[(9-$f)/$scale]"; } #line of letter
|
if($flip) { $cur = $db{$l}[(9-$f)/$scale] // $db{'?'}[(9-$f)/$scale]; } #line of letter
|
||||||
else { $cur = "$db{$l}[$f/$scale]"; }
|
else { $cur = $db{$l}[$f/$scale] // $db{'?'}[$f/$scale]; }
|
||||||
|
|
||||||
$whitespace = " " x $scale;
|
$whitespace = " " x $scale;
|
||||||
$cur =~ s/ /$whitespace/g;
|
$cur =~ s/ /$whitespace/g;
|
||||||
@ -323,7 +323,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"A" => [
|
A => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c1 $c2 $c3 ",
|
||||||
@ -334,7 +334,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"a" => [
|
a => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -345,7 +345,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"B" => [
|
B => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -356,7 +356,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"b" => [
|
b => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -367,7 +367,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"C" => [
|
C => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -378,7 +378,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"c" => [
|
c => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -389,7 +389,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"D" => [
|
D => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -400,7 +400,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"d" => [
|
d => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
@ -411,7 +411,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"E" => [
|
E => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -422,7 +422,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"e" => [
|
e => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -433,7 +433,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"F" => [
|
F => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 ",
|
"$c1 $c2 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -444,7 +444,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"f" => [
|
f => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 ",
|
"$c3 $c1 $c2 ",
|
||||||
@ -455,7 +455,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"G" => [
|
G => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -466,7 +466,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"g" => [
|
g => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -477,7 +477,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
],
|
],
|
||||||
"H" => [
|
H => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -488,7 +488,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"h" => [
|
h => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -499,7 +499,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"I" => [
|
I => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -510,7 +510,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"i" => [
|
i => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -521,7 +521,7 @@ sub db1 {
|
|||||||
"$c1 $c2 ",
|
"$c1 $c2 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"J" => [
|
J => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 ",
|
"$c3 $c1 $c2 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -532,7 +532,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"j" => [
|
j => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 ",
|
"$c3 $c1 $c2 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -543,7 +543,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
],
|
],
|
||||||
"K" => [
|
K => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -554,7 +554,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"k" => [
|
k => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -565,7 +565,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"L" => [
|
L => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -576,7 +576,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"l" => [
|
l => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -587,7 +587,7 @@ sub db1 {
|
|||||||
"$c1 $c2 ",
|
"$c1 $c2 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"M" => [
|
M => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -598,7 +598,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"m" => [
|
m => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -609,7 +609,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"N" => [
|
N => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
@ -620,7 +620,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"n" => [
|
n => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -631,7 +631,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"O" => [
|
O => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -642,7 +642,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"o" => [
|
o => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -653,7 +653,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"P" => [
|
P => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -664,7 +664,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"p" => [
|
p => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -675,7 +675,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
],
|
],
|
||||||
"Q" => [
|
Q => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -686,7 +686,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
],
|
],
|
||||||
"q" => [
|
q => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -697,7 +697,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
],
|
],
|
||||||
"R" => [
|
R => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -708,7 +708,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"r" => [
|
r => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -719,7 +719,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"S" => [
|
S => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -730,7 +730,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"s" => [
|
s => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -741,7 +741,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"T" => [
|
T => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -752,7 +752,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"t" => [
|
t => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -763,7 +763,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"U" => [
|
U => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -774,7 +774,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"u" => [
|
u => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -785,7 +785,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"V" => [
|
V => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
@ -796,7 +796,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"v" => [
|
v => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -807,7 +807,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"W" => [
|
W => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
@ -818,7 +818,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"w" => [
|
w => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -829,7 +829,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"X" => [
|
X => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -840,7 +840,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"x" => [
|
x => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -851,7 +851,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"Y" => [
|
Y => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -862,7 +862,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"y" => [
|
y => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -873,7 +873,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
],
|
],
|
||||||
"Z" => [
|
Z => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -884,7 +884,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"z" => [
|
z => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -895,7 +895,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\~" => [
|
'~' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -906,7 +906,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\`" => [
|
'`' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 ",
|
"$c3 $c1 $c2 ",
|
||||||
@ -917,7 +917,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\!" => [
|
'!' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -928,7 +928,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\@" => [
|
'@' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -939,7 +939,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\#" => [
|
'#' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -950,7 +950,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\$" => [
|
'$' => [
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -961,7 +961,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
],
|
],
|
||||||
"\%" => [
|
'%' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -972,7 +972,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\^" => [
|
'^' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -983,7 +983,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\&" => [
|
'&' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 $c3 ",
|
||||||
@ -994,7 +994,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\*" => [
|
'*' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 ",
|
"$c1 $c2 $c3 $c1 $c2 ",
|
||||||
@ -1005,7 +1005,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\(" => [
|
'(' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -1016,7 +1016,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\)" => [
|
')' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -1027,7 +1027,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"_" => [
|
'_' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -1038,7 +1038,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\-" => [
|
'-' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -1049,7 +1049,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\+" => [
|
'+' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -1060,7 +1060,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\=" => [
|
'=' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -1071,7 +1071,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\|" => [
|
'|' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
@ -1082,7 +1082,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\\" => [
|
'\\' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
@ -1093,7 +1093,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\[" => [
|
'[' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -1104,7 +1104,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\]" => [
|
']' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
@ -1115,7 +1115,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3",
|
"$c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\{" => [
|
'{' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -1126,7 +1126,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\}" => [
|
'}' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
@ -1137,7 +1137,7 @@ sub db1 {
|
|||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\:" => [
|
':' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -1148,7 +1148,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\;" => [
|
';' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
@ -1159,7 +1159,7 @@ sub db1 {
|
|||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\'" => [
|
'\'' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 ",
|
"$c3 $c1 $c2 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -1170,7 +1170,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\"" => [
|
'"' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
"$c1 $c2 $c3 $c1 $c2 $c3",
|
"$c1 $c2 $c3 $c1 $c2 $c3",
|
||||||
@ -1181,7 +1181,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\<" => [
|
'<' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3",
|
"$c3 $c1 $c2 $c3",
|
||||||
@ -1192,7 +1192,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\>" => [
|
'>' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c1 $c2 $c3 ",
|
"$c1 $c2 $c3 ",
|
||||||
@ -1203,7 +1203,7 @@ sub db1 {
|
|||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
],
|
],
|
||||||
"\?" => [
|
'?' => [
|
||||||
"$c3 ",
|
"$c3 ",
|
||||||
"$c3 $c1 $c2 $c3 ",
|
"$c3 $c1 $c2 $c3 ",
|
||||||
"$c3 $c1 $c2 $c3 $c1 $c2 ",
|
"$c3 $c1 $c2 $c3 $c1 $c2 ",
|
||||||
|
Loading…
Reference in New Issue
Block a user