ref: 3c724f5a03ba3846bce90e0fbc11e4f4e5b5e09a
dir: /bin/rn/
#!/bin/rc
from=$1
to=$2
charconst='''[^'']*'''
strconst='"([^"]|\\")*"'
name='[a-zA-Z_][a-zA-Z_0-9]*'
partial=.^`{echo -n $from | tr -c '' .}
exec ssam 'y/'$charconst'/ y/'$strconst'/ x/'$name'/ g/'$from'/ v/'$partial'/ c/'$to