document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. [root@monitor host-services]# more /usr/lib64/nagios/check_wordpress
  2. #!/usr/bin/perl
  3. use Getopt::Std;
  4. use LWP::UserAgent;
  5. use LWP::ConnCache;
  6.  
  7. #USAGE $0 -u $donde
  8.  
  9. getopts(\'u:\');
  10. my $error_message="Error estableciendo una conexión con la base de datos";
  11.  
  12. my $browser=LWP::UserAgent->new;
  13.  
  14. my $url=$opt_u;
  15. my $response=$browser->get($url);
  16. my $respuesta=$response->content;
  17.  
  18. if ($respuesta=~m/$error_message/i)
  19. {
  20.     print ("CRITICAL, Database link is broken\\n");
  21.     exit 2;
  22. }
  23. else
  24. {
  25.     print ("OK\\n");
  26.     exit 0;
  27. }
');