perldoc perlop
[download]

is your other friend... you have lots of friends in Perl.. Kinda reminds me of the old Sunday school song (with apologies to nobody) "What a friend we have in Camel!"

Anyway, take a look at your comparison statement in your first "if" statement. You are doing an assign and not a comparison.

Check out perlop... you'll be glad you did...