my $capture = qx($Cmd); 
print $capture . "\n";