... und die Meldungen würden dir anzeigen was du falsch machst.
Perl warnt nicht wenn man
if($var = $wert){}
statt
if($var eq $wert){}
oder
if($var == $wert){}
schreibt
Dann macht dein Perl es anders als meins:
#!/usr/bin/perl -w
use strict;
my $v = 'x';
print 'ja' if $v = 1;
Ausgabe:
Found = in conditional, should be == at t.pl line 5.
ja
Struppi.