Fixed WeatherData.pm. NOAA had changed the format of their output causing REGEXP to fail.
This commit is contained in:
parent
518d820a5e
commit
d675ed5a29
2 changed files with 2 additions and 1 deletions
|
|
@ -97,7 +97,7 @@ sub _getLocationData {
|
|||
my $document = $response->content;
|
||||
$document =~ s/\n/ /g;
|
||||
$document =~ s/\s+/ /g;
|
||||
$document =~ m!<hr>\s<div\salign="center">\s(.*?)<br>.*?<br>.*?<br>.*?<br>\s(.*?):\s(.*?) °F<br>!;
|
||||
$document =~ m!<div\salign="center">\s(.*?)<br>.*?<br>.*?<br>.*?<br>\s(.*?):\s(.*?) °F<br>!;
|
||||
$locData = {
|
||||
query => $location,
|
||||
cityState => $1 || $location,
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue