minix/bin/ed/test/s1.t
2012-03-14 16:52:31 +01:00

6 lines
61 B
Perl

s/\([^ ][^ ]*\)/(\1)/g
2s
/3/s
/\(4\)/sr
/\(.\)/srg
%s/i/&e/