RosettaCodeData/Task/Substring/Ed/substring.ed

14 lines
132 B
Plaintext

# by Artyom Bologov
H
t0
t0
t0
t0
1s/..\(.\{2\}\).*/\1/
2s/..\(.*\)/\1/
3s/.$//
4s/.*\(c.\{2\}\).*/\1/
5s/.*\(cd.\{3\}\).*/\1/
,p
Q