Help for this page

Select Code to Download

Select or download this

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

Select or download this
```
Miami, FL
Boston, MA
```