If this is a direct cut and paste, you have a problem with:

$weather->get_weather(');

Unbalanced quotes really screw things up, and give wacky errors.

Besides that, there's no reason to undo strict here, and your second regex looks to be whacking any zip code. I'd be surprised if you were passing anything to Geo::Weather after it.

I'll assume that the definition of $report at the very end is a typo, and that it's supposed to be at the beginning.

strict would have caught most of these, but unbalanced quotes throw off the whole parser. I run into that with my stuff every couple of days.