diff --git a/src/PVE/SysFSTools.pm b/src/PVE/SysFSTools.pm
index 57f0ac8..8eb9f2e 100644
--- a/src/PVE/SysFSTools.pm
+++ b/src/PVE/SysFSTools.pm
@@ -198,7 +198,7 @@ sub file_write {
     my $fh = IO::File->new($filename, "w");
     return undef if !$fh;
 
-    my $res = print $fh $buf;
+    my $res = defined(syswrite($fh, $buf)) ? 1 : 0;
 
     $fh->close();