cat: Fix run-cat-locally script so it doesn't go via Perl.

[libguestfs.git] / cat / run-cat-locally

diff --git a/cat/run-cat-locally b/cat/run-cat-locally
index 7945463..9467ad6 100755 (executable)
--- a/cat/run-cat-locally
+++ b/cat/run-cat-locally
@@ -50,4 +50,4 @@ $ENV{LD_LIBRARY_PATH} = $path.'/src/.libs';
 $ENV{LIBGUESTFS_PATH} = $path.'/appliance';
 
 #print (join " ", ("$path/$tool/virt-$tool", @ARGV), "\n");
-exec('perl', "$path/$tool/virt-$tool", @ARGV);
+exec("$path/$tool/virt-$tool", @ARGV);