Re^3: Open and parsing a file with array of hashes!?

[hbm]

use strict;
use warnings;
my $weather = do "weather.txt";
print $_->{xml_api_reply}->{weather}->{forecast_information}->{city}->
+{-data},$/  for @$weather;

Prints:

Miami, FL
Boston, MA