$ENV{LIBGUESTFS_PATH} = $path.'/appliance';
$ENV{PERL5LIB} = $path.'/perl/blib/lib:'.$path.'/perl/blib/arch';
-exec('perl', $path.'/cat/virt-cat.pl', @ARGV);
+exec('perl', $path.'/cat/virt-cat', @ARGV);
$ENV{LIBGUESTFS_PATH} = $path.'/appliance';
$ENV{PERL5LIB} = $path.'/perl/blib/lib:'.$path.'/perl/blib/arch';
-exec('perl', $path.'/df/virt-df.pl', @ARGV);
+exec('perl', $path.'/df/virt-df', @ARGV);
$ENV{LIBGUESTFS_PATH} = $path.'/appliance';
$ENV{PERL5LIB} = $path.'/perl/blib/lib:'.$path.'/perl/blib/arch';
-exec('perl', $path.'/edit/virt-edit.pl', @ARGV);
+exec('perl', $path.'/edit/virt-edit', @ARGV);
$ENV{LIBGUESTFS_PATH} = $path.'/appliance';
$ENV{PERL5LIB} = $path.'/perl/blib/lib:'.$path.'/perl/blib/arch';
-exec('perl', $path.'/inspector/virt-inspector.pl', @ARGV);
+exec('perl', $path.'/inspector/virt-inspector', @ARGV);
$ENV{LIBGUESTFS_PATH} = $path.'/appliance';
$ENV{PERL5LIB} = $path.'/perl/blib/lib:'.$path.'/perl/blib/arch';
-exec('perl', $path.'/rescue/virt-rescue.pl', @ARGV);
+exec('perl', $path.'/rescue/virt-rescue', @ARGV);