14 lines
60 B
Perl
14 lines
60 B
Perl
|
g/./s/./x/\
|
||
|
|
u\
|
||
|
|
s/./y/\
|
||
|
|
u\
|
||
|
|
s/./z/\
|
||
|
|
u
|
||
|
|
u
|
||
|
|
0a
|
||
|
|
hello
|
||
|
|
.
|
||
|
|
$a
|
||
|
|
world
|
||
|
|
.
|