Select Code to Download

use 5.010;
use warnings;
...
say $nbytes;

$st->finish();

my $st=$con->new_stream(Sys::Virt::Stream::NONBLOCK);
$dom->open_console($st, undef, 0);