C:\Users\Corion>perl -wc Projekte\tmp.pl
Found = in conditional, should be == at Projekte\tmp.pl line 37.
Found = in conditional, should be == at Projekte\tmp.pl line 41.
Projekte\tmp.pl syntax OK