my $str=' "Das ist ein Test" ';
print "Gebe${str}aus!\n";