1
2
3

unless( grep{ $_ eq $to_check}@array ){
    print "$to_check ist noch nicht im Array vorhanden\n";
}

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/