print "eingabe:\n";
$input = <STDIN>;
if ($input eq "asd") {
	print "richtig\n";
} else {
	print "falsch\n";
}