Forum Discussion

ltaylor510_5583's avatar
ltaylor510_5583
Icon for Nimbostratus rankNimbostratus
Sep 18, 2008

Perl script to display All BigIP pool members

I have a Perl CGI application in apache that will need a perl script to display all the available elements in one script:   ("poolname" "address" "port" "session_state" "priority_group")  ...
dev
devops
iControl
Thomas_LE_GENTI's avatar
Thomas_LE_GENTI
Icon for Nimbostratus rankNimbostratus
Oct 13, 2008
Hi !

 

 

I changed a little bit the code given above, but the redefinition of the typecast isn't working with nagios.

 

 

I have this error :

 

 

**ePN /usr/local/nagios/libexec//check_F5.pl: "Use of uninitialized value in string eq at (eval 135) line 66,

 

 

and here is the part :

 

 

 
 sub SOAP::Deserializer::typecast 
 { 
         my ($self, $value, $name, $attrs, $children, $type) = @_; 
         my $retval = undef; 
  
         if ( ($type ne undef) && ("{urn:iControl}Common.EnabledState" eq $type) )here is line 66 
                 { 
                         $retval = $value; 
                 } 
         return $retval; 
 }

 

 

I think it's because sometimes the $type variable is empty, and it cannot evaluate with anything in nagios.

 

 

What could I do in order to get the problem solved ?

 

 

thanks !