Max:

Quiero escribir un guión Kshell que sustituirá a la última / por |.

por ejemplo: / home / apps / prueba / documento debe ser sustituido como / home / apps / prueba | documento.

La longitud de la cuerda no es constante.

Gracias,
Ceniza

# echo "/home/apps/test/document" | sed 's/^\(.*\)\/\(.*\)/\1\|\2/'
/home/apps/test|document

sed 's_/\([^/]+\)$_|\1_'

Hola.
Que necesitaba para utilizar "*" en lugar de "+". Algunas versiones de sed puede necesitar "-r" para el uso extendido de expresiones regulares, en la que la necesidad de parens también modificados:

#!/bin/sh -

# @(#) user2    Demonstrate replacement of last specific character, sed.

sed --version | head -1

echo
echo " Original:"
echo "/home/apps/test/document" |
sed 's_/\([^/]+\)$_|\1_'

echo
echo " Modified:"
echo "/home/apps/test/document" |
sed 's_/\([^/]*\)$_|\1_'

echo
echo " Original with -r:"
echo "/home/apps/test/document" |
sed -r -e 's_/([^/]+)$_|\1_'

exit 0

% ./user2
GNU sed version 4.1.2

 Original:
/home/apps/test/document

 Modified:
/home/apps/test|document

 Original with -r:
/home/apps/test|document

En realidad, lo que he puesto se destina a ello, pero se distrae por un script de awk:

sed 's_/\([^/][^/]*\)$_|\1_'

cr=$(echo /tutu/tatat/titi/tutu | awk -F/ '{ print $NF; }')
echo /tutu/tatat/titi/tutu | sed -e 's/\/'$cr'$/|'$cr'/'
/tutu/tatat/titi|tutu

Hola Guyz:

Gracias por su ayuda. Esp Reborg, i usado su sugerencia, y funciona perfectamente.

Gracias!