if($string eq "Perl-Community") { print "Hallo\n"; }
else                            { print "Tschuess\n"; }