ok so im still working away on this weather thing(i would like to thank mark solomon,
if he ever reads this stuff, for writing a great weather modual!!!) but im searching a
variable for a certain phrase, its not finding it, but i know its there, and i cant
figure out whats not matching,(i suck at regular expressions) so look at this:
$currentW = qw(At 4:00 PM, Orlando Exec, FL conditions were fair weather at 79°F wind
was north at 9 mph. The relative humidity was 52%, and barometric pressure was steady
from 30.13 in.);
%skies = (
'SUNNY' => 'sunny skies',
'MOSUNNY' => 'mostly sunny skies',
'PTSUNNY' => 'partly sunny skies',
'CLEAR' => 'clear weather',
'DRIZZLE' => 'a drizzle',
'CLOUDY' => 'cloudy skies',
'MOCLDY' => 'mostly cloudy skies',
'PTCLDY' => 'partly cloudy skies',
'LGT RAIN' => 'light rain',
'FRZ DRZL' => 'freezing drizzle',
'FLURRIES' => 'flurries',
'LGT SNOW' => 'light snow',
'SNOW' => 'snow',
'N/A' => 'N/A',
'NOT AVBL' => '*not available*',
'FAIR' => 'fair weather');
foreach $key (keys(%skies)){
if ($currentW =~ m/'$skies{$key}'/){
$sky = "$key";
}
}
if you can see what the im missing help me out,
thanx a billion
nate
