Resultados de la búsqueda a petición "perl"
Perl: ¿Qué ámbitos / cierres / entornos están produciendo este comportamiento?
Dado un directorio raíz Deseo identificar el directorio padre más superficial de cualquier directorio .svn y pom.xml. Para lograr esto, definí la siguiente función use File::Find; sub firstDirWithFileUnder { $needle=@_[0]; my $result = 0; ...
Cómo encontrar manejos de archivos globales abiertos en un programa perl
Solo rastreé un problema en el que tenía que cerrar todos los controladores de archivo abiertos para que mi script Apache cgi continuara. Rastreé el problema hasta Parse :: RecDescent. #!/usr/bin/env perl use strict; use warnings; use feature ...
¿Puede Ruby, PHP o Perl crear un archivo precompilado para el código como Python?
Para Python, puede crear una versión precompilada file.pyc para que el programa pueda ejecutarse sin ser interpretado nuevamente. ¿Pueden Ruby, PHP y Perl hacer lo mismo en la línea de comando?
while (1) vs. para (;;) ¿Hay una diferencia de velocidad?
Versión larga.. Un compañero de trabajo afirmó hoy después de ver mi uso dewhile (1) en un script de Perl quefor (;;) es más rápido. Argumenté que deberían ser los mismos con la esperanza de que el intérprete optimizara cualquier diferencia. ...
¿Cómo inicio el navegador web predeterminado en Perl en cualquier sistema operativo?
Quiero abrir una URL, comohttp://www.example.com/, al final de un script de Perl. No quiero acceder a él con WWW :: Mechanize, pero en realidad mostrar la página web al usuario en un navegador web gráfico. Hay maneras de hacer esto en Mac open ...
¿Debo usar \ do [0-9] para hacer coincidir los dígitos en una expresión regular de Perl?
Después de leer varias preguntas / respuestas en las últimas semanas, he visto el uso de\d en perl expresiones regulares comentadas como incorrectas. Como en las versiones posteriores de perl\d no es lo mismo que[0-9], como\d ...
¿Asignación mediante el operador ternario?
Estoy en Perl 5.8 y necesito asignar un valor predeterminado. Terminé haciendo esto: if ($model->test) { $review = "1" } else { $review = '' }El valor de$model->test va a ser cualquiera"1" o indefinido. Si hay algo ...
¿Cómo puedo tomar n elementos al azar de una matriz Perl?
Tengo una matriz,A = [a1,a2,a3,...aP] con tallaP. Tengo que probarq elementos de la matriz A. Planeo usar un bucle conq iteraciones, y elige aleatoriamente un elemento de A en cada iteración. Pero, ¿cómo puedo asegurarme de que el número ...
Conecte a SQL Server 2005 desde Perl y haga un SELECT
¿Cómo hago un SELECT en un SQL Server 2005 desde un script Perl?
¿Cómo puedo pasar mi variable de bucle Bash al intérprete de Perl?
Estoy tratando de modificar algunos scripts con una combinación de Bash y Perl. El problema es que Perl piensa que$index es su propia variable, que nunca se define: for index in {1..25}; do perl -pi -e 's/\d+/$index/' cmd_$index.sh; done Hay ...