--- libapache-mod-perl-1.21.orig/lib/Apache/StatINC.pm
+++ libapache-mod-perl-1.21/lib/Apache/StatINC.pm
@@ -15,7 +15,7 @@
 	local $^W = 0;
 	my $mtime = (stat $file)[9];
 	  # warn and skip the files with relative paths which can't be locate by applying @INC;
-	warn "Apache::StatINC: Can't locate $file\n",next unless defined $mtime and $mtime;
+	warn("Apache::StatINC: Can't locate $file\n"),next unless defined $mtime and $mtime;
 	unless(defined $Stat{$file}) { 
 	    $Stat{$file} = $^T;
 	}