freebsd-nq/bin/ed/test/s2.t

5 lines
31 B
Perl

,s/./(&)/3
s/$/00
2s//%/g
s/^l