$c=0 if ($c < 0);
[download]

Typo. That's what I get for trying to do something quickly before lunch. Shades of old Basic programming shinning through. However, I could not get this to work last night....now it does....at work. Maybe my Perl interpreter on the home machine is broken. I had a similar problem in the past with variables such as: $n = $filenameB if ($n = $filenameA);

I had a similar problem in the past with variables such as: $n = $filenameB if ($n = $filenameA);


No wonder you are having problems with this, two errors in the same line :). First of all you are doing an assignment in the if-condition so this should be '==' instead of '='. And second '==' only works for numbers which is probably not what you want ($filename !!). You should use 'eq' instead. $n = $filenameB if ($n eq $filenameA);


-- Hofmator

my $c = -5;
print "C is now $c\n";

$c = 0 if ($c < 0);
print "C is now $c\n";
[download]