print $input "erste Frage an den Server\n";

while(<$input>) {
    print "Antwort vom Server: $_\n";
    print $input "Zweite Frage an den Server\n";
}