Using perl Syntax Highlighting
Lo que no entiendo es qué significa el punto al final.
Cualquier ayuda, muchas gracias de antemano.
-
- Publicidad
Duda con una línea
4 mensajes
• Página 1 de 1
Duda con una línea
por lis » 2008-10-30 09:59 @458
Hola, amigos del foro, me pasaron un script en que hay una línea que no entiendo del todo y es la siguiente:
Lo que no entiendo es qué significa el punto al final.
Cualquier ayuda, muchas gracias de antemano.
Lo que no entiendo es qué significa el punto al final.
Cualquier ayuda, muchas gracias de antemano.
- lis
- Perlero nuevo
- Mensajes: 106
- Registrado: 2008-05-27 21:43 @946
Publicidad
por bAsTeR » 2008-10-30 11:06 @504
Ese comando es para mover un archivo. En este caso el que describe la variable $ctl, y el punto al final no estoy muy seguro pero creo que lo mueve a la ruta donde estás actualmente aunque como te digo no estoy muy seguro.
Esperemos otra respuesta más segura.
Esperemos otra respuesta más segura.
- bAsTeR
- Perlero nuevo
- Mensajes: 63
- Registrado: 2008-10-28 11:29 @520
- Ubicación: Chihuahua, Chih. Mexico
por natxo » 2008-10-30 13:05 @587
lis escribiste:Hola amigos del foro, me pasaron un script en que hay una línea que no entiendo del todo y es la siguiente:
system"(mv ../$ctl .)"
Lo que no entiendo es qué significa el punto al final.
Cualquier ayuda, muchas gracias de antemano.
Esto no tiene nada que ver con Perl
Lo que haces es mover (mv) un archivo que está en un nivel superior (..) al nivel en que te encuentras (.). Lo hace con un comando shell del sistema (system), aunque lo mismo y seguramente más rápido (al no tener que crear otro proceso) lo puedes hacer con el módulo File::Copy que si no me equivoco es parte de la distribución oficial de Perl.
saludos,
Natxo Asenjo
Natxo Asenjo
- natxo
- Perlero nuevo
- Mensajes: 76
- Registrado: 2007-08-09 16:22 @723
- Ubicación: Países Bajos
por explorer » 2008-10-30 15:28 @686
En efecto, la línea copia un fichero que está en un nivel superior al nivel en que estamos.
El módulo File::Copy realiza muchas comprobaciones antes de realizar el movimiento, que, primero, lo intenta con un rename(), y si falla, lo intenta con un copy() seguido de un utime() (copiar atributos) y de un unlink() (borrado).
¿Esto tarda más que ejecutar el proceso externo? Pues yo creo que depende, porque el proceso mv va a realizar los mismos pasos (renombrado o copia) pero con menos comprobaciones, ya que el proceso sabe en qué sistema operativo se encuentra y qué reglas puede aplicar.
También depende del número de veces que por unidad de tiempo se ejecute esta línea. Desde luego, es muy costoso crear nuevos procesos externos al nuestro para realizar otras operaciones. Bueno... "era" muy costoso, ya que las máquinas y sistemas operativos actuales son tan rápidos y eficientes que ese costo se ha reducido mucho.
Habría que hacer un benchmark para comprobar qué es mejor.
Desde luego, el hacerlo en Perl tiene una gran ventaja: es independiente del sistema operativo, por lo que, en el futuro, podríamos instalar nuestro programa en otra máquina distinta. Y, también, no tenemos que preocuparnos de saber si el comando mv está disponible en el sistema o no.
El módulo File::Copy realiza muchas comprobaciones antes de realizar el movimiento, que, primero, lo intenta con un rename(), y si falla, lo intenta con un copy() seguido de un utime() (copiar atributos) y de un unlink() (borrado).
¿Esto tarda más que ejecutar el proceso externo? Pues yo creo que depende, porque el proceso mv va a realizar los mismos pasos (renombrado o copia) pero con menos comprobaciones, ya que el proceso sabe en qué sistema operativo se encuentra y qué reglas puede aplicar.
También depende del número de veces que por unidad de tiempo se ejecute esta línea. Desde luego, es muy costoso crear nuevos procesos externos al nuestro para realizar otras operaciones. Bueno... "era" muy costoso, ya que las máquinas y sistemas operativos actuales son tan rápidos y eficientes que ese costo se ha reducido mucho.
Habría que hacer un benchmark para comprobar qué es mejor.
Desde luego, el hacerlo en Perl tiene una gran ventaja: es independiente del sistema operativo, por lo que, en el futuro, podríamos instalar nuestro programa en otra máquina distinta. Y, también, no tenemos que preocuparnos de saber si el comando mv está disponible en el sistema o no.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
4 mensajes
• Página 1 de 1
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados