Further to Corions' most salient observations, I would suggest the use of

use warnings;
use strict;
[download]

In that way, you'd discover or, more accurately perl would tell you, that certain of the variables are not declared and initialised before use e.g. $localidade ...