my $inst = ExtUtils::Installed->new();
my @modules = $inst->modules();

foreach (@modules) {
my $ver = $inst->version($_) || “???”;
printf( “%-12s — %s\n”, $_, $ver );
}
exit 0;

会产生报错：
[root@d1-gytest01 heart]# perl 2.pl
Unrecognized character \xE2 at 2.pl line 12.

你测试过这个脚本么？你试试，用邮件沟通一下哦，谢谢。

这样就OK了。
gcc -o setsourcergba setsourcergba.c $(pkg-config –cflags –libs cairo)
详见如下：
http://www.ogre3d.org/forums/viewtopic.php?f=2&t=67445

我在GCC上手动加上这个就好了。
高手帮忙看下了，谢谢

错误如下：
ubuntu:~/source$ gcc -o setsourcergba $(pkg-config –cflags –libs cairo) setsourcergba.c
/tmp/ccXvDLCB.o: In function `main’:
setsourcergba.c:(.text+0×21): undefined reference to `cairo_image_surface_create’
setsourcergba.c:(.text+0×31): undefined reference to `cairo_create’
setsourcergba.c:(.text+0×55): undefined reference to `cairo_scale’
setsourcergba.c:(.text+0×73): undefined reference to `cairo_set_source_rgb’
setsourcergba.c:(.text+0x8b): undefined reference to `cairo_move_to’
setsourcergba.c:(.text+0xa3): undefined reference to `cairo_line_to’
setsourcergba.c:(.text+0xbb): undefined reference to `cairo_move_to’
setsourcergba.c:(.text+0xd3): undefined reference to `cairo_line_to’
setsourcergba.c:(.text+0xe9): undefined reference to `cairo_set_line_width’
setsourcergba.c:(.text+0xf5): undefined reference to `cairo_stroke’
setsourcergba.c:(.text+0×121): undefined reference to `cairo_rectangle’
setsourcergba.c:(.text+0×149): undefined reference to `cairo_set_source_rgba’
setsourcergba.c:(.text+0×155): undefined reference to `cairo_fill’
setsourcergba.c:(.text+0×185): undefined reference to `cairo_rectangle’
setsourcergba.c:(.text+0x1ad): undefined reference to `cairo_set_source_rgba’
setsourcergba.c:(.text+0x1b9): undefined reference to `cairo_fill’
setsourcergba.c:(.text+0x1e9): undefined reference to `cairo_rectangle’
setsourcergba.c:(.text+0×211): undefined reference to `cairo_set_source_rgba’
setsourcergba.c:(.text+0x21d): undefined reference to `cairo_fill’
setsourcergba.c:(.text+0×231): undefined reference to `cairo_surface_write_to_png’
setsourcergba.c:(.text+0x23d): undefined reference to `cairo_destroy’
setsourcergba.c:(.text+0×249): undefined reference to `cairo_surface_destroy’
collect2: ld returned 1 exit status
如下：
ubuntu:~/source/cairo-1.10.2$ gcc -v
Using built-in specs.
COLLECT_GCC=gcc
COLLECT_LTO_WRAPPER=/usr/lib/gcc/i686-linux-gnu/4.6.1/lto-wrapper
Target: i686-linux-gnu
Configured with: ../src/configure -v –with-pkgversion=’Ubuntu/Linaro 4.6.1-9ubuntu3′ –with-bugurl=file:///usr/share/doc/gcc-4.6/README.Bugs –enable-languages=c,c++,fortran,objc,obj-c++,go –prefix=/usr –program-suffix=-4.6 –enable-shared –enable-linker-build-id –with-system-zlib –libexecdir=/usr/lib –without-included-gettext –enable-threads=posix –with-gxx-include-dir=/usr/include/c++/4.6 –libdir=/usr/lib –enable-nls –with-sysroot=/ –enable-clocale=gnu –enable-libstdcxx-debug –enable-libstdcxx-time=yes –enable-plugin –enable-objc-gc –enable-targets=all –disable-werror –with-arch-32=i686 –with-tune=generic –enable-checking=release –build=i686-linux-gnu –host=i686-linux-gnu –target=i686-linux-gnu
Thread model: posix
gcc version 4.6.1 (Ubuntu/Linaro 4.6.1-9ubuntu3)

是怎么回事呢，直接执行脚本时是有数据的，就是显示不到图上

perl /var/www/html/scripts/tomcatstats.pl 10.8.60.201:80 admin admin http-80
jvm_memory_free:2639307856 jvm_memory_max:4278190080 jvm_memory_total:4278190080 connector_max_time:7185188 connector_error_count:209489 connector_bytes_sent:21931788757 connector_processing_time:228373660 connector_request_count:1124901 connector_bytes_received:2296686340 connector_current_thread_count:483 connector_min_spare_threads:25 connector_max_threads:1024 connector_max_spare_threads:75 connector_current_threads_busy:401