5 lines
31 B
Perl
5 lines
31 B
Perl
|
,s/./(&)/3
|
||
|
|
s/$/00
|
||
|
|
2s//%/g
|
||
|
|
s/^l
|