X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=cat%2Fvirt-cat.pl;h=329ba6e342a44e354616be051731d3ea235e274e;hp=1ac720c2622255a5ed6c159752fd8ec5b86b69ed;hb=7801621dc946fe894c960e683db3cf921ef23af6;hpb=2ab233b3124f4dd3e7c686de110d9a97cc525c18 diff --git a/cat/virt-cat.pl b/cat/virt-cat.pl index 1ac720c..329ba6e 100755 --- a/cat/virt-cat.pl +++ b/cat/virt-cat.pl @@ -25,9 +25,6 @@ use Sys::Guestfs::Lib qw(open_guest get_partitions resolve_windows_path inspect_operating_systems mount_operating_system); use Pod::Usage; use Getopt::Long; -use Data::Dumper; -use File::Temp qw/tempdir/; -use XML::Writer; use Locale::TextDomain 'libguestfs'; =encoding utf8 @@ -47,8 +44,9 @@ virt-cat - Display a file in a virtual machine C is a command line tool to display the contents of C where C exists in the named virtual machine (or disk image). -C can be used to quickly view a single file. For more -complex cases you should look at the L tool. +C can be used to quickly view a single file. To edit a +file, use C. For more complex cases you should look at the +L tool. =head1 EXAMPLES @@ -116,8 +114,8 @@ at all. =cut GetOptions ("help|?" => \$help, - "version" => \$version, - "connect|c=s" => \$uri, + "version" => \$version, + "connect|c=s" => \$uri, ) or pod2usage (2); pod2usage (1) if $help; if ($version) { @@ -140,7 +138,6 @@ if ($uri) { } $g->launch (); -$g->wait_ready (); # List of possible filesystems. my @partitions = get_partitions ($g); @@ -168,6 +165,7 @@ print $g->download($filename, "/dev/stdout"); L, L, +L, L, L, L,