1
2

C:\>perl -e "my $test = 'Hallo#Welt#sdf#asd#asd#'; print qq~yes\n~ if ($test =~ tr!#!!) == 5;"
yes

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/