[caracas-pm] Ayuda con Expresiones Regulares
Guillermo Escalante
metallinux at gmail.com
Tue Aug 8 06:55:53 PDT 2006
Muchas Gracias Francisco.
Como veo me estaba ahogando yo solo en un vaso de agua la cosa estaba
super sencilla (yo más o menos tenia ya la idea pero es que la
documentación esta un poco engorrosa). Pero bueno es que soy nuevo con
Perl y no tengo mucha experiencia en lo de las Expresiones Regulares..
La cosa quedo así:
/opt/perl/bin/perl -p -i.bak -e
's!Systems/.*-([^/]*)/.*/UsmPrint.ps!Systems/$1/script/UsmPrint.ps!
usm*/conf/param.cfg
y funcionó como queria nuevamente gracias
2006/8/8, Francisco Ugarte Rivas <f.ugarte.ve at gmail.com>:
> Hola Guillermo, quizas lo que tengas q hacer es tan solo agregar un '.*-' en
> el sitio correcto.
>
> Algo así.
>
> #! C:\bin\perl
>
> my $var1 =
> "Systems/1353NM-XX1X/data/eml/usmvW.Y.Z/UsmPrint.pshjnubuknlSystems/1353NM-X2XX/data/eml/usmvW.Y.Z/UsmPrint.psijlihkhugyjfujffSystems/1353NM-X3XX/data/eml/usmvW.Y.Z/UsmPrint.ps";
>
> print "var 1 = $var1;\n\n";
>
> $var1 =~
> s!Systems/.*-([^/]*).*/UsmPrint.ps!Systems/$1/script/UsmPrint.ps!;
>
> print "new var 1 = $var1;\n";
>
> Saludos.
>
>
> --
> ..:: Francisco Ugarte Rivas ::..
> Estudiante de Ing de Computación
> Webmaster USB
> Universidad Simón Bolívar
> +58-0412-7196800
> _______________________________________________
> caracas-pm mailing list
> caracas-pm at pm.org
> http://mail.pm.org/mailman/listinfo/caracas-pm
>
>
--
---------------------------------------------------------------
| Ing. Guillermo Escalante |
| Nick IRC: MetallinuX |
| GNU/Linux User #379221 |
| Debian GNU/Linux "Testing/Unstable" |
| "Cuando hablamos de Software Libre, |
| nos referimos a la libertad, no al precio" |
---------------------------------------------------------------
More information about the caracas-pm
mailing list