if ( $string =~ m/Perl-community/i )
{
    print "Hallo";
}
else
{
    print "Tschuess";
}