que son para que sirven comentarios sobre ellos relacionados con Perl y alguna idea de como hacer un trap con perl,, se los agradecería, 
-
- Publicidad
Traps
17 mensajes
• Página 1 de 2 • 1, 2
Traps
por Kiloko » 2007-10-05 16:27 @727
Saludos Perleros, les comento que hoy comienza un proyecto con traps, pero no tengo idea de lo que sean, me podrían iluminar.. que son para que sirven comentarios sobre ellos relacionados con Perl y alguna idea de como hacer un trap con perl,, se los agradecería,
que son para que sirven comentarios sobre ellos relacionados con Perl y alguna idea de como hacer un trap con perl,, se los agradecería, Nunca interrumpas a tu enemigo cuando está cometiendo un error
Napoleón Bonaparte
Napoleón Bonaparte
-
Kiloko - Perlero nuevo
- Mensajes: 243
- Registrado: 2007-07-10 18:26 @810
- Ubicación: MOnterrey NL
Publicidad
por explorer » 2007-10-05 18:04 @795
Según Wikipedia, Trap (computing), es un tipo de interrupción síncrona normalmente causa por una condición excepcional (por ejemplo, una división por cero o un acceso a memoria inválido) en el proceso de un usuario.
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
por Kiloko » 2007-10-08 09:19 @429
Gracias Explorer, encontré esta página, que espero les pueda servir a los que como yo están iniciando o van a iniciar lo SNMP y Traps.
http://meshier.com/docs/oreilly/tcpip2/snmp/ch10_01.htm#ahead-1
Saludos
http://meshier.com/docs/oreilly/tcpip2/snmp/ch10_01.htm#ahead-1
Saludos
Nunca interrumpas a tu enemigo cuando está cometiendo un error
Napoleón Bonaparte
Napoleón Bonaparte
-
Kiloko - Perlero nuevo
- Mensajes: 243
- Registrado: 2007-07-10 18:26 @810
- Ubicación: MOnterrey NL
por Kiloko » 2007-10-08 15:03 @669
Tengo este programa en Perl
Que lo que hace o debería hacer es mandar un Trap pero me manda un error.
¿Alguna idea de lo que sea, o ya le ha pasado a alguien?
Saludos...
Que lo que hace o debería hacer es mandar un Trap pero me manda un error.
Using perl Syntax Highlighting
#!/usr/local/bin/perl
my $comunidad = public;
my $host = "148.245.52.216";
my $host_name = localhost;
snmptrap("public\@$host:162", ".1.3.6.1.4.1.2789", "$host_name", 6, 1247, \
".1.3.6.1.4.1.2789.1247.1", "int", "2448816");
my $comunidad = public;
my $host = "148.245.52.216";
my $host_name = localhost;
snmptrap("public\@$host:162", ".1.3.6.1.4.1.2789", "$host_name", 6, 1247, \
".1.3.6.1.4.1.2789.1247.1", "int", "2448816");
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
- Código: Seleccionar todo
Unknown SNMP var SCALAR(0x839194c)
at /root/workspace/TRABS/4.pl line 20
¿Alguna idea de lo que sea, o ya le ha pasado a alguien?
Saludos...
Nunca interrumpas a tu enemigo cuando está cometiendo un error
Napoleón Bonaparte
Napoleón Bonaparte
-
Kiloko - Perlero nuevo
- Mensajes: 243
- Registrado: 2007-07-10 18:26 @810
- Ubicación: MOnterrey NL
por Kiloko » 2007-10-09 11:49 @534
rayos, tienes razón... qué raro, en el ejemplo que propone el tutorial que anexé, tiene ese símbolo... mmm, ok, mil gracias.Nunca interrumpas a tu enemigo cuando está cometiendo un error
Napoleón Bonaparte
Napoleón Bonaparte
-
Kiloko - Perlero nuevo
- Mensajes: 243
- Registrado: 2007-07-10 18:26 @810
- Ubicación: MOnterrey NL
Aclarando
por Kiloko » 2007-10-11 12:10 @549
Aún tengo unas dudas, sobre Traps y MIBS. Yo entiendo que, un MIB, digamos 1.2.3.4.11.2.4, quiere decir que hay una baja de voltaje y puede dar 2 valores: 1 o 0. Para esto hay que verlo por dentro, y bueno, tengo un programa que polea estos MIBS y me da ese 0 y 1 que yo traduzco en bajo o normal (voltaje) pero no comprendo su relación con los traps.
¿Alguien me podría explicar esto si es posible con un ejemplo?
Saludos.
¿Alguien me podría explicar esto si es posible con un ejemplo?
Saludos.
Nunca interrumpas a tu enemigo cuando está cometiendo un error
Napoleón Bonaparte
Napoleón Bonaparte
-
Kiloko - Perlero nuevo
- Mensajes: 243
- Registrado: 2007-07-10 18:26 @810
- Ubicación: MOnterrey NL
por Kiloko » 2007-10-11 17:34 @773
Ya, por fin comprendo...
Por cierto tengo un error al momento de correr un programa. El error es (el programa contacta a un equipo CISCO para polear mibs; quiero creer que es por la versión del SO -Solaris- o la versión del Perl. ¿Qué opinan==?==????):
Revisando el snmpUtils.pm encuentro esto:
Por cierto tengo un error al momento de correr un programa. El error es (el programa contacta a un equipo CISCO para polear mibs; quiero creer que es por la versión del SO -Solaris- o la versión del Perl. ¿Qué opinan==?==????):
- Código: Seleccionar todo
Undefined subroutine &snmpUtils::Warn called at /export/home/root/PERL/snmpUtils.pm line 81.
Revisando el snmpUtils.pm encuentro esto:
Using perl Syntax Highlighting
# do a little post processing on the overly wordy errors
# that SNMP_Session gives us...
if (defined($err) && $err ne '') {
my(@err) = split(/\n\s*/, $err);
if ($err[1] eq "no response received") {
$skipcnt{$args[0]}++;
my $host = (split(/: /,$err[2]))[1];
$host =~ s/\)$//;
$err = "No response from $host";
$err .= " - Skipping."
if ($skipcnt{$args[0]} >= $MAXTRIES);
} elsif ($#err+1 > 2) {
my($code) = (split(/: /, $err[2]))[1];
$code = ": undefined error code" if (!$code);
$err = "$err[1] $code.";
if ($code eq "noSuchName") {
my($oid) = $err[3];
$oid =~ s/.*\((.*)\).*/$1/;
$err .= " $oid";
}
} else {
$err =~ s/\n//g;
}
Warn($err);
}
# that SNMP_Session gives us...
if (defined($err) && $err ne '') {
my(@err) = split(/\n\s*/, $err);
if ($err[1] eq "no response received") {
$skipcnt{$args[0]}++;
my $host = (split(/: /,$err[2]))[1];
$host =~ s/\)$//;
$err = "No response from $host";
$err .= " - Skipping."
if ($skipcnt{$args[0]} >= $MAXTRIES);
} elsif ($#err+1 > 2) {
my($code) = (split(/: /, $err[2]))[1];
$code = ": undefined error code" if (!$code);
$err = "$err[1] $code.";
if ($code eq "noSuchName") {
my($oid) = $err[3];
$oid =~ s/.*\((.*)\).*/$1/;
$err .= " $oid";
}
} else {
$err =~ s/\n//g;
}
Warn($err);
}
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
Nunca interrumpas a tu enemigo cuando está cometiendo un error
Napoleón Bonaparte
Napoleón Bonaparte
-
Kiloko - Perlero nuevo
- Mensajes: 243
- Registrado: 2007-07-10 18:26 @810
- Ubicación: MOnterrey NL
Respuesta
por Kiloko » 2007-10-11 18:22 @807
Y ese error, niñas y niños Perleros, sale cuando su MIB es demasiado larga, como mi caso:
Saludos... y espero este tip les sirva...
- Código: Seleccionar todo
1.3.6.1.2.1.10.131.1.1.1.1.1
Saludos... y espero este tip les sirva...
Nunca interrumpas a tu enemigo cuando está cometiendo un error
Napoleón Bonaparte
Napoleón Bonaparte
-
Kiloko - Perlero nuevo
- Mensajes: 243
- Registrado: 2007-07-10 18:26 @810
- Ubicación: MOnterrey NL
17 mensajes
• Página 1 de 2 • 1, 2
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados