property
character_height
=> (
initable
=> 0,
writable
=> 0,
value
=> 8
);
function
character_A
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
'_'
;
$character
[1][2] =
'('
;
$character
[1][7] =
')'
;
$character
[2][0] =
$character
[2][1] =
$character
[2][3] =
$character
[2][6] =
$character
[2][8] =
$character
[2][9] =
' '
;
$character
[2][2] =
$character
[2][4] =
'/'
;
$character
[2][5] =
$character
[2][7] =
'\\'
;
$character
[3][1] =
$character
[3][3] =
'('
;
$character
[3][4] =
$character
[3][5] =
'_'
;
$character
[3][6] =
$character
[3][8] =
')'
;
$character
[4][2] =
')'
;
$character
[4][7] =
'('
;
$character
[5][1] =
$character
[5][4] =
'/'
;
$character
[5][5] =
$character
[5][8] =
'\\'
;
$character
[6][0] =
'/'
;
$character
[6][1] =
$character
[6][2] =
$character
[6][7] =
$character
[6][8] =
'_'
;
$character
[6][3] =
'('
;
$character
[6][6] =
')'
;
$character
[6][9] =
'\\'
;
return
\
@character
;
};
function
character_B
=>
sub
{
my
@character
=
$_
[0]->default_character(9);
$character
[0][1] =
$character
[0][2] =
$character
[0][3] =
$character
[0][4] =
$character
[2][5] =
$character
[4][5] =
$character
[5][5] =
'_'
;
$character
[0][5] =
$character
[0][6] =
$character
[1][1] =
$character
[1][5] =
$character
[3][6] =
$character
[5][1] =
'_'
;
$character
[1][0] =
$character
[2][4] =
$character
[5][4] =
$character
[6][0] =
'('
;
$character
[1][7] =
$character
[3][2] =
$character
[4][7] =
'\\'
;
$character
[2][2] =
$character
[2][6] =
$character
[2][8] =
$character
[5][2] =
$character
[5][6] =
$character
[5][8] =
')'
;
$character
[3][7] =
$character
[4][2] =
$character
[6][7] =
'/'
;
$character
[6][1] =
$character
[6][2] =
$character
[6][3] =
$character
[6][4] =
$character
[6][5] =
$character
[6][6] =
'_'
;
return
\
@character
;
};
function
character_C
=>
sub
{
my
@character
=
$_
[0]->default_character(8);
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[1][4] =
$character
[1][5] =
$character
[1][6] =
$character
[5][4] =
$character
[5][5] =
$character
[5][6] =
$character
[6][3] =
$character
[6][4] =
$character
[6][5] =
$character
[6][6] =
'_'
;
$character
[1][2] =
$character
[2][1] =
$character
[2][3] =
'/'
;
$character
[5][1] =
$character
[5][3] =
$character
[6][2] =
'\\'
;
$character
[3][0] =
$character
[3][2] =
$character
[4][0] =
$character
[4][2] =
'('
;
$character
[1][7] =
$character
[6][7] =
')'
;
return
\
@character
;
};
function
character_D
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[0][1] =
'_'
;
$character
[0][2] =
'_'
;
$character
[0][3] =
'_'
;
$character
[0][4] =
'_'
;
$character
[0][5] =
'_'
;
$character
[0][6] =
'_'
;
$character
[1][0] =
'('
;
$character
[1][1] =
'_'
;
$character
[1][4] =
'_'
;
$character
[1][5] =
'_'
;
$character
[1][7] =
'\\'
;
$character
[2][2] =
')'
;
$character
[2][4] =
')'
;
$character
[2][6] =
'\\'
;
$character
[2][8] =
'\\'
;
$character
[3][1] =
'('
;
$character
[3][3] =
'('
;
$character
[3][7] =
')'
;
$character
[3][9] =
')'
;
$character
[4][2] =
')'
;
$character
[4][4] =
')'
;
$character
[4][7] =
')'
;
$character
[4][9] =
')'
;
$character
[5][1] =
'/'
;
$character
[5][3] =
'/'
;
$character
[5][4] =
'_'
;
$character
[5][5] =
'_'
;
$character
[5][6] =
'/'
;
$character
[5][8] =
'/'
;
$character
[6][0] =
'('
;
$character
[6][1] =
'_'
;
$character
[6][2] =
'_'
;
$character
[6][3] =
'_'
;
$character
[6][4] =
'_'
;
$character
[6][5] =
'_'
;
$character
[6][6] =
'_'
;
$character
[6][7] =
'/'
;
return
\
@character
;
};
function
character_E
=>
sub
{
my
@character
=
$_
[0]->default_character(8);
$character
[0][2] =
'_'
;
$character
[0][3] =
'_'
;
$character
[0][4] =
'_'
;
$character
[0][5] =
'_'
;
$character
[0][6] =
'_'
;
$character
[1][1] =
'/'
;
$character
[1][3] =
'_'
;
$character
[1][4] =
'_'
;
$character
[1][5] =
'_'
;
$character
[1][6] =
'/'
;
$character
[2][0] =
'('
;
$character
[2][2] =
'('
;
$character
[2][3] =
'_'
;
$character
[2][4] =
'_'
;
$character
[3][1] =
')'
;
$character
[3][3] =
'_'
;
$character
[3][4] =
'_'
;
$character
[3][5] =
')'
;
$character
[4][0] =
'('
;
$character
[4][2] =
'('
;
$character
[5][1] =
'\\'
;
$character
[5][3] =
'\\'
;
$character
[5][4] =
'_'
;
$character
[5][5] =
'_'
;
$character
[5][6] =
'_'
;
$character
[6][2] =
'\\'
;
$character
[6][3] =
'_'
;
$character
[6][4] =
'_'
;
$character
[6][5] =
'_'
;
$character
[6][6] =
'_'
;
$character
[6][7] =
'\\'
;
return
\
@character
;
};
function
character_F
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][1] =
'_'
;
$character
[0][2] =
'_'
;
$character
[0][3] =
'_'
;
$character
[0][4] =
'_'
;
$character
[0][5] =
'_'
;
$character
[0][6] =
'_'
;
$character
[0][7] =
'_'
;
$character
[0][8] =
'_'
;
$character
[0][9] =
'_'
;
$character
[1][0] =
'('
;
$character
[1][1] =
'_'
;
$character
[1][5] =
'_'
;
$character
[1][6] =
'_'
;
$character
[1][7] =
'_'
;
$character
[1][8] =
'_'
;
$character
[1][9] =
'_'
;
$character
[1][10] =
')'
;
$character
[2][2] =
')'
;
$character
[2][4] =
'('
;
$character
[2][5] =
'_'
;
$character
[2][6] =
'_'
;
$character
[2][7] =
'_'
;
$character
[3][1] =
'('
;
$character
[3][5] =
'_'
;
$character
[3][6] =
'_'
;
$character
[3][7] =
'_'
;
$character
[3][8] =
')'
;
$character
[4][2] =
')'
;
$character
[4][4] =
'('
;
$character
[5][1] =
'('
;
$character
[5][5] =
')'
;
$character
[6][2] =
'\\'
;
$character
[6][3] =
'_'
;
$character
[6][4] =
'/'
;
return
\
@character
;
};
function
character_G
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[0][3] =
'_'
;
$character
[0][4] =
'_'
;
$character
[0][5] =
'_'
;
$character
[0][6] =
'_'
;
$character
[0][7] =
'_'
;
$character
[1][2] =
'/'
;
$character
[1][4] =
'_'
;
$character
[1][5] =
'_'
;
$character
[1][6] =
'_'
;
$character
[1][8] =
'\\'
;
$character
[2][1] =
'/'
;
$character
[2][3] =
'/'
;
$character
[2][7] =
'\\'
;
$character
[2][8] =
'_'
;
$character
[2][9] =
')'
;
$character
[3][0] =
'('
;
$character
[3][2] =
'('
;
$character
[3][5] =
'_'
;
$character
[3][6] =
'_'
;
$character
[3][7] =
'_'
;
$character
[3][8] =
'_'
;
$character
[4][0] =
'('
;
$character
[4][2] =
'('
;
$character
[4][4] =
'('
;
$character
[4][5] =
'_'
;
$character
[4][6] =
'_'
;
$character
[4][9] =
')'
;
$character
[5][1] =
'\\'
;
$character
[5][3] =
'\\'
;
$character
[5][4] =
'_'
;
$character
[5][5] =
'_'
;
$character
[5][6] =
'/'
;
$character
[5][8] =
'/'
;
$character
[6][2] =
'\\'
;
$character
[6][3] =
'_'
;
$character
[6][4] =
'_'
;
$character
[6][5] =
'_'
;
$character
[6][6] =
'_'
;
$character
[6][7] =
'/'
;
return
\
@character
;
};
function
character_H
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[0][0] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[1][1] =
$character
[1][2] =
$character
[1][4] =
$character
[1][5] =
$character
[1][7] =
$character
[1][8] =
$character
[2][0] =
$character
[2][2] =
$character
[2][7] =
$character
[3][0] =
$character
[3][1] =
$character
[3][3] =
$character
[3][6] =
$character
[4][0] =
$character
[4][2] =
$character
[4][4] =
$character
[4][5] =
$character
[4][7] =
$character
[5][0] =
$character
[5][1] =
$character
[5][3] =
$character
[5][6] =
$character
[6][0] =
$character
[6][4] =
$character
[6][5] =
' '
;
$character
[0][1] =
$character
[0][2] =
$character
[0][7] =
$character
[0][8] =
$character
[2][4] =
$character
[2][5] =
$character
[3][4] =
$character
[3][5] =
$character
[6][2] =
$character
[6][7] =
'_'
;
$character
[1][0] =
$character
[2][3] =
$character
[3][7] =
$character
[4][1] =
$character
[4][3] =
$character
[5][5] =
$character
[5][7] =
'('
;
$character
[1][3] =
$character
[2][1] =
$character
[6][6] =
$character
[6][8] =
'\\'
;
$character
[1][6] =
$character
[2][8] =
$character
[6][1] =
$character
[6][3] =
'/'
;
$character
[1][9] =
$character
[2][6] =
$character
[3][2] =
$character
[4][6] =
$character
[4][8] =
$character
[5][2] =
$character
[5][4] =
')'
;
return
\
@character
;
};
function
character_I
=>
sub
{
my
@character
=
$_
[0]->default_character(8);
$character
[0][2] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[1][2] =
$character
[1][6] =
$character
[5][2] =
$character
[5][6] =
$character
[5][7] =
$character
[6][2] =
$character
[6][3] =
$character
[6][4] =
$character
[6][5] =
$character
[6][6] =
'_'
;
$character
[2][3] =
$character
[2][5] =
$character
[3][3] =
$character
[3][5] =
$character
[4][3] =
$character
[4][5] =
$character
[5][3] =
$character
[5][5] =
'|'
;
$character
[1][1] =
$character
[6][7] =
'('
;
$character
[1][7] =
')'
;
$character
[6][1] =
'/'
;
return
\
@character
;
};
function
character_J
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][2] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[0][7] =
$character
[0][8] =
$character
[0][9] =
$character
[1][2] =
$character
[1][3] =
$character
[1][4] =
$character
[1][7] =
$character
[1][8] =
$character
[1][9] =
$character
[4][1] =
$character
[4][2] =
$character
[5][3] =
$character
[6][2] =
$character
[6][3] =
$character
[6][4] =
'_'
;
$character
[1][1] =
$character
[3][4] =
$character
[3][6] =
$character
[5][0] =
$character
[5][2] =
'('
;
$character
[1][10] =
$character
[2][5] =
$character
[2][7] =
$character
[4][5] =
$character
[4][7] =
')'
;
$character
[5][4] =
$character
[5][6] =
$character
[6][5] =
'/'
;
$character
[6][1] =
'\\'
;
return
\
@character
;
};
function
character_K
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[0][1] =
$character
[0][2] =
$character
[0][6] =
$character
[0][7] =
$character
[0][8] =
$character
[1][7] =
$character
[1][8] =
$character
[2][3] =
$character
[6][2] =
$character
[6][7] =
'_'
;
$character
[1][0] =
$character
[2][0] =
$character
[3][0] =
$character
[4][0] =
$character
[5][0] =
$character
[6][0] =
$character
[2][2] =
$character
[3][5] =
$character
[5][2] =
'('
;
$character
[1][1] =
$character
[3][1] =
$character
[4][1] =
$character
[6][1] =
$character
[6][3] =
$character
[1][3] =
$character
[1][9] =
')'
;
$character
[4][3] =
$character
[2][4] =
$character
[1][5] =
$character
[2][6] =
'/'
;
$character
[4][4] =
$character
[5][5] =
$character
[6][6] =
$character
[4][6] =
$character
[5][7] =
$character
[6][8] =
'\\'
;
return
\
@character
;
};
function
character_L
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][1] =
$character
[0][2] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[1][1] =
$character
[1][5] =
$character
[5][0] =
$character
[5][1] =
$character
[5][5] =
$character
[5][6] =
$character
[5][7] =
$character
[4][8] =
$character
[4][9] =
$character
[6][1] =
$character
[6][2] =
$character
[6][3] =
$character
[6][4] =
$character
[6][5] =
$character
[6][6] =
$character
[6][7] =
$character
[6][8] =
'_'
;
$character
[6][0] =
'\\'
;
$character
[6][9] =
'/'
;
$character
[2][2] =
$character
[2][4] =
$character
[3][2] =
$character
[3][4] =
$character
[4][2] =
$character
[4][4] =
$character
[5][2] =
$character
[5][4] =
'|'
;
$character
[1][0] =
'('
;
$character
[1][6] =
$character
[5][8] =
$character
[5][10] =
')'
;
return
\
@character
;
};
function
character_M
=>
sub
{
my
@character
=
$_
[0]->default_character(14);
$character
[6][1] =
$character
[5][1] =
$character
[4][2] =
$character
[3][3] =
$character
[5][3] =
$character
[4][4] =
$character
[2][7] =
$character
[4][7] =
$character
[1][8] =
$character
[1][10] =
'/'
;
$character
[1][3] =
$character
[1][5] =
$character
[2][6] =
$character
[4][6] =
$character
[3][10] =
$character
[4][9] =
$character
[5][10] =
$character
[4][11] =
$character
[5][12] =
$character
[6][12] =
'\\'
;
$character
[0][3] =
$character
[0][4] =
$character
[0][9] =
$character
[0][10] =
$character
[3][5] =
$character
[3][8] =
$character
[5][2] =
$character
[5][11] =
'_'
;
$character
[2][4] =
$character
[2][10] =
$character
[6][13] =
')'
;
$character
[2][3] =
$character
[2][9] =
$character
[6][0] =
'('
;
return
\
@character
;
};
function
character_N
=>
sub
{
my
@character
=
$_
[0]->default_character(14);
$character
[3][2] =
$character
[3][4] =
$character
[3][6] =
$character
[3][8] =
$character
[3][10] =
$character
[3][12] =
$character
[1][13] =
')'
;
$character
[6][0] =
$character
[4][1] =
$character
[4][3] =
$character
[4][5] =
$character
[4][7] =
$character
[4][9] =
$character
[4][11] =
'('
;
$character
[1][3] =
$character
[2][2] =
$character
[2][4] =
$character
[5][1] =
$character
[5][3] =
$character
[6][2] =
$character
[1][11] =
$character
[2][10] =
$character
[2][12] =
$character
[5][9] =
$character
[5][11] =
$character
[6][10] =
'/'
;
$character
[1][6] =
$character
[2][5] =
$character
[2][7] =
$character
[5][6] =
$character
[5][8] =
$character
[6][7] =
'\\'
;
$character
[0][4] =
$character
[0][5] =
$character
[0][12] =
$character
[6][1] =
$character
[6][8] =
$character
[6][9] =
'_'
;
return
\
@character
;
};
function
character_O
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][3] =
'_'
;
$character
[0][4] =
'_'
;
$character
[0][5] =
'_'
;
$character
[0][6] =
'_'
;
$character
[1][2] =
'/'
;
$character
[1][4] =
'_'
;
$character
[1][5] =
'_'
;
$character
[1][7] =
'\\'
;
$character
[2][1] =
'/'
;
$character
[2][3] =
'/'
;
$character
[2][6] =
'\\'
;
$character
[2][8] =
'\\'
;
$character
[3][0] =
'('
;
$character
[3][2] =
'('
;
$character
[3][3] =
')'
;
$character
[3][6] =
'('
;
$character
[3][7] =
')'
;
$character
[3][9] =
')'
;
$character
[4][0] =
'('
;
$character
[4][2] =
'('
;
$character
[4][3] =
')'
;
$character
[4][6] =
'('
;
$character
[4][7] =
')'
;
$character
[4][9] =
')'
;
$character
[5][1] =
'\\'
;
$character
[5][3] =
'\\'
;
$character
[5][4] =
'_'
;
$character
[5][5] =
'_'
;
$character
[5][6] =
'/'
;
$character
[5][8] =
'/'
;
$character
[6][2] =
'\\'
;
$character
[6][3] =
'_'
;
$character
[6][4] =
'_'
;
$character
[6][5] =
'_'
;
$character
[6][6] =
'_'
;
$character
[6][7] =
'/'
;
return
\
@character
;
};
function
character_P
=>
sub
{
my
@character
=
$_
[0]->default_character(9);
$character
[0][1]=
$character
[0][2]=
$character
[0][3]=
$character
[0][4]=
$character
[0][5]=
$character
[1][3]=
$character
[1][4]=
$character
[2][4]=
$character
[3][4]=
$character
[3][5]=
$character
[6][1]=
$character
[6][2]=
'_'
;
$character
[1][0]=
$character
[3][0]=
$character
[5][0]=
$character
[5][2]=
'('
;
$character
[1][6]=
$character
[6][3]=
'\\'
;
$character
[2][1]=
$character
[4][1]=
$character
[4][3]=
$character
[2][3]=
$character
[2][5]=
$character
[2][7]=
')'
;
$character
[3][6]=
$character
[6][0]=
'/'
;
return
\
@character
;
};
function
character_Q
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][3] =
'_'
;
$character
[0][4] =
'_'
;
$character
[0][5] =
'_'
;
$character
[0][6] =
'_'
;
$character
[1][2] =
'/'
;
$character
[1][4] =
'_'
;
$character
[1][5] =
'_'
;
$character
[1][7] =
'\\'
;
$character
[2][1] =
'/'
;
$character
[2][3] =
'/'
;
$character
[2][6] =
'\\'
;
$character
[2][8] =
'\\'
;
$character
[3][0] =
'('
;
$character
[3][2] =
'('
;
$character
[3][7] =
')'
;
$character
[3][9] =
')'
;
$character
[4][0] =
'('
;
$character
[4][2] =
'('
;
$character
[4][5] =
'/'
;
$character
[4][6] =
'\\'
;
$character
[4][7] =
')'
;
$character
[4][9] =
')'
;
$character
[5][1] =
'\\'
;
$character
[5][3] =
'\\'
;
$character
[5][4] =
'_'
;
$character
[5][5] =
'\\'
;
$character
[5][7] =
'\\'
;
$character
[5][8] =
'/'
;
$character
[6][2] =
'\\'
;
$character
[6][3] =
'_'
;
$character
[6][4] =
'_'
;
$character
[6][5] =
'_'
;
$character
[6][6] =
'\\'
;
$character
[6][8] =
'\\'
;
$character
[6][9] =
'_'
;
$character
[7][10] =
')'
;
$character
[7][9] =
$character
[7][8] =
'_'
;
$character
[7][7] =
'\\'
;
return
\
@character
;
};
function
character_R
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[1][0] =
$character
[3][0] =
$character
[5][0] =
$character
[2][3] =
$character
[5][2] =
'('
;
$character
[2][1] =
$character
[4][1] =
$character
[6][1] =
$character
[6][3] =
$character
[5][8] =
$character
[5][9] =
$character
[2][6] =
$character
[2][8] =
')'
;
$character
[0][1] =
$character
[0][2] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
'_'
;
$character
[1][4] =
$character
[1][5] =
$character
[2][4] =
$character
[2][5] =
$character
[3][5] =
$character
[3][6] =
$character
[4][8] =
$character
[5][7] =
$character
[6][2] =
$character
[6][6] =
$character
[6][7] =
'_'
;
$character
[1][7] =
$character
[4][3] =
$character
[5][4] =
$character
[6][5] =
$character
[4][5] =
$character
[5][6] =
'\\'
;
$character
[3][7] =
$character
[6][8] =
'/'
;
return
\
@character
;
};
function
character_S
=>
sub
{
my
@character
=
$_
[0]->default_character(9);
$character
[0][3] =
'_'
;
$character
[0][4] =
'_'
;
$character
[0][5] =
'_'
;
$character
[0][6] =
'_'
;
$character
[0][7] =
' '
;
$character
[1][1] =
'/'
;
$character
[1][3] =
'_'
;
$character
[1][4] =
'_'
;
$character
[1][5] =
'_'
;
$character
[1][6] =
'_'
;
$character
[1][7] =
'\\'
;
$character
[2][0] =
'('
;
$character
[2][1] =
' '
;
$character
[2][2] =
'('
;
$character
[2][3] =
'_'
;
$character
[2][4] =
'_'
;
$character
[2][5] =
'_'
;
$character
[3][1] =
'\\'
;
$character
[3][2] =
'_'
;
$character
[3][3] =
'_'
;
$character
[3][4] =
'_'
;
$character
[3][5] =
'_'
;
$character
[3][7] =
'\\'
;
$character
[4][6] =
')'
;
$character
[4][8] =
')'
;
$character
[5][4] =
'_'
;
$character
[5][3] =
'_'
;
$character
[5][2] =
'_'
;
$character
[5][5] =
'/'
;
$character
[5][7] =
'/'
;
$character
[6][1] =
'/'
;
$character
[6][2] =
'_'
;
$character
[6][3] =
'_'
;
$character
[6][4] =
'_'
;
$character
[6][5] =
'_'
;
$character
[6][6] =
'/'
;
return
\
@character
;
};
function
character_T
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[0][1] =
$character
[0][2] =
$character
[0][3] =
$character
[1][1] =
$character
[1][2] =
$character
[1][3] =
$character
[0][4] =
$character
[0][5] =
$character
[6][4] =
$character
[6][5] =
$character
[0][6] =
$character
[0][7] =
$character
[0][8] =
$character
[1][6] =
$character
[1][7] =
$character
[1][8] =
'_'
;
$character
[1][0] =
$character
[3][3] =
$character
[5][3] =
$character
[3][5] =
$character
[5][5] =
'('
;
$character
[1][9] =
$character
[2][4] =
$character
[4][4] =
$character
[2][6] =
$character
[4][6] =
')'
;
$character
[6][3] =
'/'
;
$character
[6][6] =
'\\'
;
return
\
@character
;
};
function
character_U
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][0] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[0][9] =
$character
[0][10] =
$character
[1][0] =
$character
[1][2] =
$character
[1][4] =
$character
[1][5] =
$character
[1][7] =
$character
[1][9] =
$character
[1][10] =
$character
[2][1] =
$character
[2][3] =
$character
[2][4] =
$character
[2][5] =
$character
[2][6] =
$character
[2][8] =
$character
[2][10] =
$character
[3][0] =
$character
[3][2] =
$character
[3][4] =
$character
[3][5] =
$character
[3][7] =
$character
[3][9] =
$character
[3][10] =
$character
[4][1] =
$character
[4][3] =
$character
[4][4] =
$character
[4][5] =
$character
[4][6] =
$character
[4][8] =
$character
[4][10] =
$character
[5][0] =
$character
[5][2] =
$character
[5][7] =
$character
[5][9] =
$character
[5][10] =
$character
[6][0] =
$character
[6][9] =
$character
[6][10] =
' '
;
$character
[0][1] =
$character
[0][2] =
$character
[0][7] =
$character
[0][8] =
$character
[5][4] =
$character
[5][5] =
$character
[6][2] =
$character
[6][3] =
$character
[6][4] =
$character
[6][5] =
$character
[6][6] =
$character
[6][7] =
'_'
;
$character
[1][1] =
$character
[1][3] =
$character
[2][7] =
$character
[2][9] =
$character
[3][1] =
$character
[3][3] =
$character
[4][7] =
$character
[4][9] =
$character
[5][1] =
')'
;
$character
[1][6] =
$character
[1][8] =
$character
[2][0] =
$character
[2][2] =
$character
[3][6] =
$character
[3][8] =
$character
[4][0] =
$character
[4][2] =
$character
[5][8] =
'('
;
$character
[5][3] =
$character
[6][1] =
'\\'
;
$character
[5][6] =
$character
[6][8] =
'/'
;
return
\
@character
;
};
function
character_V
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[3][1] =
$character
[3][3] =
$character
[4][2] =
$character
[4][4] =
$character
[5][3] =
$character
[6][4] =
'\\'
;
$character
[3][8] =
$character
[3][6] =
$character
[4][7] =
$character
[4][5] =
$character
[5][6] =
$character
[6][5] =
'/'
;
$character
[0][1] =
$character
[0][2] =
$character
[0][7] =
$character
[0][8] =
'_'
;
$character
[2][0] =
$character
[2][2] =
$character
[1][8] =
$character
[1][6] =
'('
;
$character
[1][1] =
$character
[1][3] =
$character
[2][7] =
$character
[2][9] =
')'
;
$character
[6][0] =
$character
[6][1] =
$character
[6][2] =
$character
[6][3] =
$character
[6][6] =
$character
[6][7] =
' '
;
$character
[6][8] =
$character
[6][9] =
$character
[5][0] =
$character
[5][1] =
$character
[5][2] =
$character
[5][4] =
' '
;
$character
[5][5] =
$character
[5][7] =
$character
[5][8] =
$character
[5][9] =
$character
[4][0] =
$character
[4][1] =
' '
;
$character
[4][3] =
$character
[4][6] =
$character
[4][8] =
$character
[4][9] =
$character
[3][0] =
$character
[3][2] =
' '
;
$character
[3][4] =
$character
[3][5] =
$character
[3][7] =
$character
[3][9] =
$character
[2][1] =
$character
[2][3] =
' '
;
$character
[2][4] =
$character
[2][5] =
$character
[2][6] =
$character
[2][8] =
$character
[1][0] =
$character
[1][2] =
' '
;
$character
[1][4] =
$character
[1][5] =
$character
[1][7] =
$character
[1][9] =
$character
[0][0] =
$character
[0][3] =
' '
;
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[0][9] =
' '
;
return
\
@character
;
};
function
character_W
=>
sub
{
my
@character
=
$_
[0]->default_character(15);
$character
[0][1] =
$character
[0][2] =
$character
[0][3] =
$character
[0][11] =
$character
[0][12] =
$character
[0][13] =
$character
[6][5] =
$character
[6][9] =
$character
[4][7] =
$character
[2][7] =
'_'
;
$character
[4][11] =
$character
[1][0] =
$character
[1][3] =
$character
[5][6] =
'('
;
$character
[1][11] =
$character
[1][14] =
$character
[5][8] =
$character
[4][3] =
')'
;
$character
[2][1] =
$character
[2][4] =
$character
[3][2] =
$character
[3][5] =
$character
[5][3] =
$character
[6][4] =
$character
[3][8] =
$character
[6][8] =
'\\'
;
$character
[2][10] =
$character
[2][13] =
$character
[3][9] =
$character
[3][12] =
$character
[5][11] =
$character
[6][10] =
$character
[3][6] =
$character
[6][6] =
'/'
;
return
\
@character
;
};
function
character_X
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][0] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[0][7] =
$character
[0][8] =
$character
[1][2] =
$character
[1][4] =
$character
[1][5] =
$character
[1][7] =
$character
[1][8] =
$character
[2][0] =
$character
[2][2] =
$character
[2][7] =
$character
[3][0] =
$character
[3][1] =
$character
[3][3] =
$character
[3][6] =
$character
[4][0] =
$character
[4][2] =
$character
[4][4] =
$character
[4][5] =
$character
[4][7] =
$character
[5][0] =
$character
[5][1] =
$character
[5][3] =
$character
[5][6] =
$character
[6][0] =
$character
[6][4] =
$character
[6][5] =
' '
;
$character
[0][1] =
$character
[0][2] =
$character
[0][9] =
$character
[0][8] =
$character
[1][1] =
$character
[1][9] =
$character
[2][5] =
$character
[4][5] =
$character
[5][1] =
$character
[5][9] =
$character
[6][1] =
$character
[6][2] =
$character
[6][8] =
$character
[6][9] =
'_'
;
$character
[1][0] =
$character
[6][0] =
'('
;
$character
[1][3] =
$character
[2][2] =
$character
[2][4] =
$character
[3][3] =
$character
[4][7] =
$character
[5][6] =
$character
[5][8] =
$character
[6][7] =
'\\'
;
$character
[1][7] =
$character
[2][8] =
$character
[2][6] =
$character
[3][7] =
$character
[4][3] =
$character
[5][2] =
$character
[5][4] =
$character
[6][3] =
'/'
;
$character
[1][10] =
$character
[6][10] =
')'
;
return
\
@character
;
};
function
character_Y
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[0][0] =
$character
[0][1] =
$character
[0][9] =
$character
[0][8] =
$character
[6][4] =
$character
[6][5] =
'_'
;
$character
[1][9] =
$character
[5][5] =
'('
;
$character
[1][0] =
$character
[5][4] =
')'
;
$character
[1][2] =
$character
[2][1] =
$character
[2][3] =
$character
[3][2] =
$character
[3][4] =
$character
[4][3] =
$character
[6][6] =
'\\'
;
$character
[1][7] =
$character
[2][8] =
$character
[2][6] =
$character
[3][7] =
$character
[3][5] =
$character
[4][6] =
$character
[6][3] =
'/'
;
return
\
@character
;
};
function
character_Z
=>
sub
{
my
@character
=
$_
[0]->default_character(10);
$character
[0][8] =
'_'
;
$character
[0][2] =
'_'
;
$character
[0][3] =
'_'
;
$character
[0][4] =
'_'
;
$character
[0][5] =
'_'
;
$character
[0][6] =
'_'
;
$character
[0][7] =
'_'
;
$character
[1][1] =
'('
;
$character
[1][2] =
'_'
;
$character
[1][3] =
'_'
;
$character
[1][4] =
'_'
;
$character
[1][5] =
'_'
;
$character
[1][7] =
' '
;
$character
[1][8] =
' '
;
$character
[1][9] =
')'
;
$character
[2][5] =
'/'
;
$character
[2][8] =
'/'
;
$character
[3][1] =
'_'
;
$character
[3][2] =
'_'
;
$character
[3][3] =
'_'
;
$character
[3][4] =
'/'
;
$character
[3][5] =
' '
;
$character
[3][6] =
' '
;
$character
[3][7] =
'/'
;
$character
[3][8] =
'_'
;
$character
[4][0] =
'/'
;
$character
[4][1] =
'_'
;
$character
[4][2] =
'_'
;
$character
[4][3] =
' '
;
$character
[4][4] =
' '
;
$character
[4][5] =
' '
;
$character
[4][6] =
'_'
;
$character
[4][7] =
'_'
;
$character
[4][8] =
'_'
;
$character
[4][9] =
')'
;
$character
[5][2] =
'/'
;
$character
[5][4] =
'/'
;
$character
[5][5] =
'_'
;
$character
[5][6] =
'_'
;
$character
[5][7] =
'_'
;
$character
[5][8] =
'_'
;
$character
[3][9] =
' '
;
$character
[6][1] =
'('
;
$character
[6][2] =
'_'
;
$character
[6][3] =
'_'
;
$character
[6][4] =
'_'
;
$character
[6][5] =
'_'
;
$character
[6][6] =
'_'
;
$character
[6][7] =
'_'
;
$character
[6][8] =
'_'
;
$character
[6][9] =
')'
;
return
\
@character
;
};
function
character_a
=>
sub
{
$_
[0]->character_A };
function
character_b
=>
sub
{
$_
[0]->character_B };
function
character_c
=>
sub
{
$_
[0]->character_C };
function
character_d
=>
sub
{
$_
[0]->character_D };
function
character_e
=>
sub
{
$_
[0]->character_E };
function
character_f
=>
sub
{
$_
[0]->character_F };
function
character_g
=>
sub
{
$_
[0]->character_G };
function
character_h
=>
sub
{
$_
[0]->character_H };
function
character_i
=>
sub
{
$_
[0]->character_I };
function
character_j
=>
sub
{
$_
[0]->character_J };
function
character_k
=>
sub
{
$_
[0]->character_K };
function
character_l
=>
sub
{
$_
[0]->character_L };
function
character_m
=>
sub
{
$_
[0]->character_M };
function
character_n
=>
sub
{
$_
[0]->character_N };
function
character_o
=>
sub
{
$_
[0]->character_O };
function
character_p
=>
sub
{
$_
[0]->character_P };
function
character_q
=>
sub
{
$_
[0]->character_Q };
function
character_r
=>
sub
{
$_
[0]->character_R };
function
character_s
=>
sub
{
$_
[0]->character_S };
function
character_t
=>
sub
{
$_
[0]->character_T };
function
character_u
=>
sub
{
$_
[0]->character_U };
function
character_v
=>
sub
{
$_
[0]->character_V };
function
character_w
=>
sub
{
$_
[0]->character_W };
function
character_x
=>
sub
{
$_
[0]->character_X };
function
character_y
=>
sub
{
$_
[0]->character_Y };
function
character_z
=>
sub
{
$_
[0]->character_Z };
function
character_0
=>
sub
{
my
@character
=
$_
[0]->default_character(8);
$character
[0][2] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[1][3] =
$character
[1][4] =
$character
[5][3] =
$character
[5][4] =
$character
[6][2] =
$character
[6][3] =
$character
[6][4] =
$character
[6][5] =
'_'
;
$character
[2][0] =
$character
[2][2] =
$character
[3][0] =
$character
[3][2] =
$character
[4][0] =
$character
[4][2] =
$character
[5][0] =
$character
[5][2] =
'('
;
$character
[2][5] =
$character
[2][7] =
$character
[3][5] =
$character
[3][7] =
$character
[4][5] =
$character
[4][7] =
$character
[5][5] =
$character
[5][7] =
')'
;
$character
[1][1] =
$character
[6][6] =
'/'
;
$character
[1][6] =
$character
[6][1] =
'\\'
;
return
\
@character
;
};
function
character_1
=>
sub
{
my
@character
=
$_
[0]->default_character(7);
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[3][1] =
$character
[6][4] =
$character
[6][5] =
'_'
;
$character
[1][2] =
$character
[2][1] =
$character
[3][0] =
$character
[1][6] =
$character
[2][3] =
$character
[3][2] =
$character
[6][3] =
'/'
;
$character
[6][6] =
'\\'
;
$character
[2][4] =
$character
[4][4] =
$character
[2][6] =
$character
[4][6] =
')'
;
$character
[3][3] =
$character
[5][3] =
$character
[3][5] =
$character
[5][5] =
'('
;
return
\
@character
;
};
function
character_2
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][3]=
'_'
;
$character
[0][4]=
'_'
;
$character
[0][5]=
'_'
;
$character
[0][6]=
'_'
;
$character
[0][7]=
'_'
;
$character
[0][8]=
'_'
;
$character
[1][2]=
'('
;
$character
[1][3]=
'_'
;
$character
[1][4]=
'_'
;
$character
[1][5]=
'_'
;
$character
[1][6]=
'_'
;
$character
[1][9]=
'\\'
;
$character
[2][7]=
')'
;
$character
[2][9]=
'/'
;
$character
[3][2]=
'_'
;
$character
[3][3]=
'_'
;
$character
[3][6]=
'/'
;
$character
[3][8]=
'/'
;
$character
[4][1]=
'/'
;
$character
[4][4]=
'\\'
;
$character
[4][5]=
'/'
;
$character
[4][7]=
'/'
;
$character
[4][9]=
'_'
;
$character
[4][10]=
'_'
;
$character
[5][0]=
'('
;
$character
[5][2]=
'('
;
$character
[5][3]=
')'
;
$character
[5][5]=
'\\'
;
$character
[5][6]=
'_'
;
$character
[5][7]=
'_'
;
$character
[5][8]=
'/'
;
$character
[5][10]=
'/'
;
$character
[6][1]=
'\\'
;
$character
[6][2]=
'_'
;
$character
[6][3]=
'_'
;
$character
[6][4]=
'\\'
;
$character
[6][5]=
'_'
;
$character
[6][6]=
'_'
;
$character
[6][7]=
'_'
;
$character
[6][8]=
'_'
;
$character
[6][9]=
'('
;
return
\
@character
;
};
function
character_3
=>
sub
{
my
@character
=
$_
[0]->default_character(7);
$character
[0][0]=
$character
[0][1]=
$character
[0][2]=
$character
[0][3]=
$character
[0][4]=
'_'
;
$character
[1][1]=
$character
[1][2]=
'_'
;
$character
[2][1]=
$character
[2][2]=
'_'
;
$character
[3][1]=
$character
[3][2]=
'_'
;
$character
[5][0]=
$character
[5][1]=
$character
[5][2]=
'_'
;
$character
[6][1]=
$character
[6][2]=
$character
[6][3]=
$character
[6][4]=
'_'
;
$character
[1][5]=
$character
[4][3]=
$character
[4][5]=
'\\'
;
$character
[2][5]=
$character
[5][3]=
$character
[6][5]=
'/'
;
$character
[3][0]=
$character
[3][4]=
'('
;
$character
[1][0]=
$character
[2][3]=
$character
[5][6]=
$character
[6][0]=
')'
;
return
\
@character
;
};
function
character_4
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][2] =
$character
[0][6] =
$character
[2][3] =
$character
[2][4] =
$character
[2][8] =
$character
[2][9] =
$character
[2][10] =
$character
[3][2] =
$character
[3][3] =
$character
[3][4] =
$character
[3][8] =
$character
[3][9] =
$character
[6][5] =
$character
[6][6] =
$character
[6][7] =
'_'
;
$character
[1][1] =
$character
[1][3] =
$character
[1][5] =
$character
[6][4] =
'/'
;
$character
[1][7] =
$character
[3][1] =
$character
[6][8] =
'\\'
;
$character
[2][0] =
$character
[2][2] =
$character
[2][7] =
$character
[3][10] =
$character
[4][7] =
$character
[5][7] =
'('
;
$character
[2][5] =
$character
[4][5] =
$character
[5][5] =
')'
;
return
\
@character
;
};
function
character_5
=>
sub
{
my
@character
=
$_
[0]->default_character(8);
$character
[0][1]=
'_'
,
$character
[0][2]=
'_'
,
$character
[0][3]=
'_'
,
$character
[0][4]=
'_'
,
$character
[0][5]=
'_'
,
$character
[0][6]=
'_'
;
$character
[1][0]=
'|'
,
$character
[1][3]=
'_'
,
$character
[1][4]=
'_'
,
$character
[1][5]=
'_'
,
$character
[1][6]=
'('
;
$character
[2][0]=
'|'
,
$character
[2][2]=
'|'
,
$character
[2][3]=
'_'
,
$character
[2][4]=
'_'
;
$character
[3][0]=
'|'
,
$character
[3][1]=
'_'
,
$character
[3][2]=
'_'
,
$character
[3][3]=
'_'
,
$character
[3][5]=
'\\'
;
$character
[4][4]=
'\\'
,
$character
[4][6]=
'\\'
;
$character
[5][0]=
'_'
,
$character
[5][1]=
'_'
,
$character
[5][2]=
'_'
,
$character
[5][3]=
'_'
,
$character
[5][4]=
'_'
,
$character
[5][5]=
')'
,
$character
[5][7]=
')'
;
$character
[6][0]=
')'
,
$character
[6][1]=
'_'
,
$character
[6][2]=
'_'
,
$character
[6][3]=
'_'
,
$character
[6][4]=
'_'
,
$character
[6][5]=
'_'
,
$character
[6][6]=
'/'
;
return
\
@character
;
};
function
character_6
=>
sub
{
my
@character
=
$_
[0]->default_character(8);
$character
[0][0] =
$character
[0][1] =
$character
[0][2] =
' '
;
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[0][7] =
$character
[0][8] =
'_'
;
$character
[0][9] =
' '
;
$character
[1][0] =
$character
[1][1] =
' '
;
$character
[1][2] =
'/'
;
$character
[1][3] =
' '
;
$character
[1][4] =
$character
[1][5] =
$character
[1][6] =
$character
[1][7] =
'_'
;
$character
[1][8] =
'('
;
$character
[1][9] =
' '
;
$character
[2][0] =
' '
;
$character
[2][1] =
'/'
;
$character
[2][2] =
' '
;
$character
[2][3] =
'/'
;
$character
[2][4] =
$character
[2][5] =
$character
[2][6] =
$character
[2][7] =
$character
[2][8] =
$character
[2][9] =
' '
;
$character
[3][0] =
'('
;
$character
[3][1] =
' '
;
$character
[3][2] =
'('
;
$character
[3][3] =
$character
[3][4] =
$character
[3][5] =
$character
[3][6] =
$character
[3][7] =
'_'
;
$character
[3][8] =
$character
[3][9] =
' '
;
$character
[4][0] =
'('
;
$character
[4][1] =
$character
[4][2] =
$character
[4][3] =
' '
;
$character
[4][4] =
$character
[4][5] =
$character
[4][6] =
'_'
;
$character
[4][7] =
' '
;
$character
[4][8] =
'\\'
;
$character
[4][9] =
' '
;
$character
[5][0] =
' '
;
$character
[5][1] =
'\\'
;
$character
[5][2] =
' '
;
$character
[5][3] =
'('
;
$character
[5][4] =
$character
[5][5] =
$character
[5][6] =
'_'
;
$character
[5][7] =
')'
;
$character
[5][8] =
' '
;
$character
[5][9] =
')'
;
$character
[6][0] =
$character
[6][1] =
' '
;
$character
[6][2] =
'\\'
;
$character
[6][3] =
$character
[6][4] =
$character
[6][5] =
$character
[6][6] =
'_'
;
$character
[6][7] =
'_'
;
$character
[6][8] =
'/'
;
$character
[6][9] =
' '
;
return
\
@character
;
};
function
character_7
=>
sub
{
my
@character
=
$_
[0]->default_character(7);
$character
[0][0] =
$character
[0][1] =
$character
[0][2] =
$character
[0][3] =
$character
[0][4] =
$character
[0][5] =
$character
[0][6] =
$character
[0][7] =
$character
[0][8] =
'_'
;
$character
[0][9] =
' '
;
$character
[1][0] =
')'
;
$character
[1][1] =
$character
[1][2] =
$character
[1][3] =
$character
[1][4] =
'_'
;
$character
[1][5] =
$character
[1][6] =
$character
[1][7] =
' '
;
$character
[1][8] =
'/'
;
$character
[1][9] =
' '
;
$character
[2][0] =
$character
[2][1] =
' '
;
$character
[2][2] =
$character
[2][3] =
$character
[2][4] =
'_'
;
$character
[2][5] =
')'
;
$character
[2][6] =
' '
;
$character
[2][7] =
'/'
;
$character
[2][8] =
$character
[2][9] =
' '
;
$character
[3][0] =
' '
;
$character
[3][1] =
')'
;
$character
[3][2] =
$character
[3][3] =
$character
[3][4] =
'_'
;
$character
[3][5] =
' '
;
$character
[3][6] =
'('
;
$character
[3][7] =
$character
[3][8] =
$character
[3][9] =
' '
;
$character
[4][0] =
$character
[4][1] =
$character
[4][2] =
$character
[4][3] =
$character
[4][4] =
' '
;
$character
[4][5] =
')'
;
$character
[4][6] =
' '
;
$character
[4][7] =
')'
;
$character
[4][8] =
$character
[4][9] =
' '
;
$character
[5][0] =
$character
[5][1] =
$character
[5][2] =
$character
[5][3] =
' '
;
$character
[5][4] =
'('
;
$character
[5][5] =
' '
;
$character
[5][6] =
'('
;
$character
[5][7] =
$character
[5][8] =
$character
[5][9] =
' '
;
$character
[6][0] =
$character
[6][1] =
$character
[6][2] =
$character
[6][3] =
' '
;
$character
[6][4] =
'/'
;
$character
[6][5] =
$character
[6][6] =
'_'
;
$character
[6][7] =
'\\'
;
$character
[6][8] =
$character
[6][9] =
' '
;
return
\
@character
;
};
function
character_8
=>
sub
{
my
@character
=
$_
[0]->default_character(9);
$character
[0][2]=
'_'
;
$character
[0][3]=
'_'
;
$character
[0][4]=
'_'
;
$character
[0][5]=
'_'
;
$character
[0][6]=
'_'
;
$character
[1][1]=
'/'
;
$character
[1][4]=
'_'
;
$character
[1][7]=
'\\'
;
$character
[2][0]=
'('
;
$character
[2][3]=
'('
;
$character
[2][4]=
'_'
;
$character
[2][5]=
')'
;
$character
[2][8]=
')'
;
$character
[3][1]=
'\\'
;
$character
[3][4]=
'_'
;
$character
[3][7]=
'/'
;
$character
[4][1]=
'/'
;
$character
[4][3]=
'/'
;
$character
[4][5]=
'\\'
;
$character
[4][7]=
'\\'
;
$character
[5][0]=
'('
;
$character
[5][2]=
'('
;
$character
[5][3]=
'_'
;
$character
[5][4]=
'_'
;
$character
[5][5]=
'_'
;
$character
[5][6]=
')'
;
$character
[5][8]=
')'
;
$character
[6][1]=
'\\'
;
$character
[6][2]=
'_'
;
$character
[6][3]=
'_'
;
$character
[6][4]=
'_'
;
$character
[6][5]=
'_'
;
$character
[6][6]=
'_'
;
$character
[6][7]=
'/'
;
return
\
@character
;
};
function
character_9
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
$character
[0][2]=
'_'
;
$character
[0][3]=
'_'
;
$character
[0][4]=
'_'
;
$character
[0][5]=
'_'
;
$character
[0][6]=
'_'
;
$character
[1][1]=
'/'
;
$character
[1][3]=
'_'
;
$character
[1][4]=
'_'
;
$character
[1][7]=
'\\'
;
$character
[2][0]=
'('
;
$character
[2][2]=
'('
;
$character
[2][3]=
'_'
;
$character
[2][4]=
'_'
;
$character
[2][5]=
')'
;
$character
[2][8]=
'\\'
;
$character
[3][1]=
'\\'
;
$character
[3][2]=
'_'
;
$character
[3][3]=
'_'
;
$character
[3][4]=
'_'
;
$character
[3][5]=
'_'
;
$character
[3][6]=
'_'
;
$character
[3][9]=
')'
;
$character
[4][7]=
')'
;
$character
[4][9]=
')'
;
$character
[5][2]=
'_'
;
$character
[5][3]=
'_'
;
$character
[5][4]=
'_'
;
$character
[5][5]=
'_'
;
$character
[5][6]=
'/'
;
$character
[5][8]=
'/'
;
$character
[6][1]=
'('
;
$character
[6][2]=
'_'
;
$character
[6][3]=
'_'
;
$character
[6][4]=
'_'
;
$character
[6][5]=
'_'
;
$character
[6][6]=
'_'
;
$character
[6][7]=
'/'
;
return
\
@character
;
};
function
space
=>
sub
{
my
@character
=
$_
[0]->default_character(11);
return
\
@character
;
};
1;