Me auto respondo:
my($directory, $last_directory) = $cwd =~ m/(.*\/)(.*)$/;
print "$last_directory\";
no tengo ni idea de qué es lo que hace (como la mitad de las cosas que
hace perl), pero me duvuelve el string que necesito :-)
Ante cualquier duda que tengáis..
select ANSWER from GOOGLE where string == "your duda"
On 2/6/08, miguel gmail
Buenas,
tengo en una variable algo como:
c:/dir1/dir2/dir3.../dirN
que viene de un cwd(). Toda la ruta, salvo el último directorio puede ser cualquier cosa. No tiene una regla definida.
Necesito encontrar la forma de quedarme sólo con "dirN".
Cual es la forma más facil de hacerlo en perl (sí, tiene que ser en perl)?
Muchas gracias por adelantado!
-- Saludos, miguel
Los agujeros negros son lugares donde dios dividió por cero.
Black holes are places where god divided by zero.
-- Saludos, miguel Los agujeros negros son lugares donde dios dividió por cero. Black holes are places where god divided by zero. --------------------------------------------------------------------- Para dar de baja la suscripción, mande un mensaje a: opensuse-es+unsubscribe@opensuse.org Para obtener el resto de direcciones-comando, mande un mensaje a: opensuse-es+help@opensuse.org