regex mit 2 Variablen - #117140 (Allgemeines zu Perl)

renee

2008-12-12 20:04

User since
2003-08-04
14371 Artikel
ModeratorIn

Du solltest bei einem erfolgreichen Match noch die Schleife abbrechen. Denn was im Moment passiert ist folgendes:

Code: (dl )

file => test.avi

schleifenbeginn
   prüfe ob test.avi "avi" enthält
      setze check auf 1
   prüfe ob test.avi "mpg" enthält
      setze check auf 0
   prüfe ob test.avi "bin" enthält
      setze check auf 0

Du siehst, dass Du bei jeder Datei, die *nicht* "bin" enthält check am Schluss auf "0" steht.

Du musst bei einem erfolgreichen Test die Schleife abbrechen, also

Code (perl): (dl )

if($file =~ m/($fileformat)/){$check=1; last;}

(siehe perldoc -f last)

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/