[hobbit] memcached monitoring script

[Martin Flemming]

Hi, Oliver !

i've got following error messages ...

[it-xymon3] /usr/lib/hobbit/client #  bin/bbcmd ext/memcache.pl
2009-03-30 08:26:42 Using default environment file /usr/lib/hobbit/client/etc/hobbitclient.cfg
Use of uninitialized value in ref-to-glob cast at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 362.
Use of uninitialized value in vec at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 362.
Use of uninitialized value in ref-to-glob cast at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 369.
Use of uninitialized value in vec at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 369.
Use of uninitialized value in ref-to-glob cast at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 370.
send() on unopened socket at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 370.
Use of uninitialized value in numeric gt (>) at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 373.
Use of uninitialized value in hash element at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 180.
Use of uninitialized value in hash element at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 167.
[it-xymon3] /usr/lib/hobbit/client #


and with debug-option


[it-xymon3] /usr/lib/hobbit/client #
  bin/bbcmd perl -d ext/memcache.pl

2009-03-30 08:27:27 Using default environment file /usr/lib/hobbit/client/etc/hobbitclient.cfg

Loading DB routines from perl5db.pl version 1.28
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(ext/memcache.pl:6):      require Cache::Memcached;
   DB<1> n
Cache::Memcached::(/usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm:38):
38:     $VERSION = "1.24";
   DB<1> n
Cache::Memcached::(/usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm:44):
44:     my $HAVE_XS = eval "use Cache::Memcached::GetParserXS; 1;";
   DB<1> n
Use of uninitialized value in ref-to-glob cast at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 362.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 362

Cache::Memcached::_write_and_read('Cache::Memcached=ARRAY(0x9fe83e4)', 
'undef', 'stats\x{d}\x{a}', 'CODE(0xa0d4f60)') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 849
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 'misc') called at ext/memcache.pl line 59
Use of uninitialized value in vec at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 362.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 362

Cache::Memcached::_write_and_read('Cache::Memcached=ARRAY(0x9fe83e4)', 
'undef', 'stats\x{d}\x{a}', 'CODE(0xa0d4f60)') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 849
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 'misc') called at ext/memcache.pl line 59
Use of uninitialized value in ref-to-glob cast at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 369.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 369

Cache::Memcached::_write_and_read('Cache::Memcached=ARRAY(0x9fe83e4)', 
'undef', 'stats\x{d}\x{a}', 'CODE(0xa0d4f60)') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 849
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 'misc') called at ext/memcache.pl line 59
Use of uninitialized value in vec at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 369.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 369

Cache::Memcached::_write_and_read('Cache::Memcached=ARRAY(0x9fe83e4)', 
'undef', 'stats\x{d}\x{a}', 'CODE(0xa0d4f60)') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 849
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 'misc') called at ext/memcache.pl line 59
Use of uninitialized value in ref-to-glob cast at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 370.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 370

Cache::Memcached::_write_and_read('Cache::Memcached=ARRAY(0x9fe83e4)', 
'undef', 'stats\x{d}\x{a}', 'CODE(0xa0d4f60)') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 849
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 'misc') called at ext/memcache.pl line 59
send() on unopened socket at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 370.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 370

Cache::Memcached::_write_and_read('Cache::Memcached=ARRAY(0x9fe83e4)', 
'undef', 'stats\x{d}\x{a}', 'CODE(0xa0d4f60)') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 849
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 'misc') called at ext/memcache.pl line 59
Use of uninitialized value in numeric gt (>) at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 373.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 373

Cache::Memcached::_write_and_read('Cache::Memcached=ARRAY(0x9fe83e4)', 
'undef', 'stats\x{d}\x{a}', 'CODE(0xa0d4f60)') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 849
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 'misc') called at ext/memcache.pl line 59
Use of uninitialized value in hash element at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 180.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 180
         Cache::Memcached::_close_sock('undef') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 374

Cache::Memcached::_write_and_read('Cache::Memcached=ARRAY(0x9fe83e4)', 
'undef', 'stats\x{d}\x{a}', 'CODE(0xa0d4f60)') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 849
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 'misc') called at ext/memcache.pl line 59
Use of uninitialized value in hash element at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 167.
  at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 167
         Cache::Memcached::_dead_sock('undef') called at /usr/lib/perl5/site_perl/5.8.8/Cache/Memcached.pm line 851
         Cache::Memcached::stats('Cache::Memcached=ARRAY(0x9fe83e4)', 
'misc') called at ext/memcache.pl line 59
Debugged program terminated.  Use q to quit or R to restart,
   use o inhibit_exit to avoid stopping after program termination,
   h q, h R or h o to get additional info.
   DB<1>


Any idea, what's going wrong for me ?

thanks & cheers

 	martin



On Sat, 28 Mar 2009, Olivier Beau wrote:

> Hi All,
>
> I wrote a quick script to monitor memcached on a hobbitclient.
> (it needs perl's Cache::Memcached)
>
>
> Olivier
>