--- plperl.c.orig	2004-11-24 17:04:07.000000000 +1300
+++ plperl.c	2004-11-24 17:04:21.000000000 +1300
@@ -244,7 +244,7 @@
 
 	safe_version = SvNV(res);
 
-	eval_pv((safe_version < 2.09 ? safe_bad : safe_ok), FALSE);
+	eval_pv((safe_version < (float)2.09 ? safe_bad : safe_ok), FALSE);
 
 	plperl_safe_init_done = true;
 }