[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