Foro - Perl en Español

Buenas, quería probar ahora a hacer que mi script de copias de seguridad funcione digamos, de forma típica, y compatible con la consola de Linux.

Es decir, que por ejemplo, genero un return válido que se pueda ver con un pipe u otro comando. O sea, sé lo del 0 es bien y 1 mal, pero lo demás...

Otra cosa es recibir pipes en tu mismo programa, o tratar con las opciones de los atributos ...

Les molesto nuevamente porque hice un script y la verdad que no me resulta muy competente. Por este motivo quería consultarles si pueden darme una mano.

#!/usr/bin/perl -w
use Term::ANSIColor qw(:constants);
print"----------------------------------------------------------------------------------------------------------------\n";
$comando2 = (split " ",( qx(grep ^PASS_MAX_DAY /etc/login.defs)) );
chomp $comando2;
if ("$comando2" != 90) {

print BOLD, RED, "Negativo:", RESET . " El valor del parametro PASS_MAX_DAYS es incorrecto\n";

}

else{

print BOLD, GREEN, "Positivo:", RESET . " El valor del ...

Les dejo el siguiente script por si alguien lo necesita.


#!/usr/bin/perl
use Digest::MD5;
@ARGV or die "Uso: $0 archivo\narchivo: /etc/passwd por ejemplo\n";
my $file = $ARGV;
my $file= shift;
open(FILE, $file) or die "no se encuentra el archivo '$file': $!";
binmode(FILE);

print Digest::MD5->new->addfile(*FILE)->hexdigest, " $file\n";

¿Alguien tiene un script para buscar sticky bit?


~$ find / -perm -1000 -exec ls -la {} \;


Yo tengo en bash pero estaba buscando en Perl.

Saludos.

Estimados,

Tengo un script el cual verifica sobre algunos archivos si el owner de éste es el usuario "root" y luego realiza una acción.

El problema que tengo es que si el archivo no existe me imprime "como acción NEGATIVA" pero no me dice cuál es su owner ya que no existe, me gustaría que en estos casos directamente no me imprima nada, ya que es erróneo.


use Term::ANSIColor qw(:constants);
my @archivos = ...

Creo que por error borré un archivo en Linux... (equipo Solaris) ¿algún comando para ver la papelera de reciclaje? ( :?: ) si es que existe algo así... ¿¿ideas?? ¿¿cómo recuperar con algún comando??

Saludos Perleros, tengo un pequeñisimo problema, tengo 8 archivos de 21megas y similares con terminación *.csv y utilizo open ofice para verlos pero me topo con el problema que son demasiadas filas al rededor de 6000 y el programa no despliega todas, que puedo hacer?, existe alguna otra aplicación en donde pueda consultar toda esta información, mi idea era verla en open ofice y hacer un filtro para buscar un dato,

Saludos

...

Saludos Perleros.

Hoy tengo la tarea de instalar un Web Server sobre Win XP. Para correr una página que despliega .ASP

Tengo una idea del camino a tomar, pero me gustaría escuchar sus opiniones que me pueden recomendar o algún problema que hallan tenido al hacer algo similar.

PD ( SÍ, ya sé que en Linux sería más fácil, pero aquí es win a la de awilvor)

Saludos

Existe alguna forma en la que pueda copiar archivos hechos en Linux a mis particiones en Windows?

Actualmente utilizo Ubuntu, pero no logro encontrar ningún programa que me permita realizar esta aplicación.

Yo si puedo ver y copiar de Linux a Windows pero no al revés...

Saludos. :(

Hola a todos y agradeciando de antemano por la ayuda que me puedan brindar sucede lo siguiente:
Tenia mi Pc instalado con Windows XP hasta que un dia de la noche a la mañana ya no arranco mas, prendo mi Pc pero se queda en el logo de windows con las barritas desplazandose se queda un rato sigue avanzando y asi se queda y no puede arrancar, en primer llegue a creer que era el ...