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.