Comment 9 for bug 646647

Here is a patch that work for me with perl 5.10.1 :

--- /usr/bin/innobackupex-1.5.1 2010-11-17 18:14:20.000000000 +0100
+++ /var/tmp/innobackupex-1.5.1 2010-12-21 10:25:24.000000000 +0100
@@ -1705,7 +1705,7 @@
         $perl_version = chr($required_perl_version[0])
             . chr($required_perl_version[1])
             . chr($required_perl_version[2]);
- if ($^V lt $perl_version) {
+ if ($^V lt "v$required_perl_version_old_style") {
             my $version = chr(48 + $required_perl_version[0])
                 . "." . chr(48 + $required_perl_version[1])
                 . "." . chr(48 + $required_perl_version[2]);