print {"N","New file
*i
1:*Nice
2:*To
3:*Meet
4:*You
5:*^Z
*1
1:*Nice
1:*Rice
*3
3:*Meet
3:*Meat
*l
1: Rice
2: To
3:*Meat
4: You
*q
Abort edit (Y/N)? y",1,"New file
*i
1:*1
2:*2
3:*4
4:*5
5:*^Z
*3i
3:*3
4:*^Z
*1d
*l
1:*2
2: 3
3: 4
4: 5
*q
Abort edit (Y/N)? y","s","New file
*i
1:*skjg;sdrljagjk
2:*jfaiowperjvkaj
3:*fawpfjkgf;ap;g
4:*^Z
*1Sf
2: jfaiowperjvkaj
*2Sf
2:*jfaiowperjvkaj
*3Sf
3: fawpfjkgf;ap;g
*1?Sf
2: jfaiowperjvkaj
O.K.? n
3:*fawpfjkgf;ap;g
O.K.? n
Not found
*q
Abort edit (Y/N)? y"}->{substr(join("",<>),2,1)}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).