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