[rafal@morgoth rafal]$ ed      
r x.sno
61
,p
again   a = trim(input) :f(end)
        output = size(a)        :(again)
end
!s4 -b %
s4 -b x.sno
test input
10
test input 2
12
12345
5
12345678
8
^D
!
,p
again   a = trim(input) :f(end)
        output = size(a)        :(again)
end
2c
        output = a ":" size(a)  :(again)
.
w
67
!s4 -b %
s4 -b x.sno
test
test:4
blabla
blabla:6
xyzzy
xyzzy:5
plugh
plugh:5
^D
!
q