Select Code to Download

if(
 $text =~ 
...
}else{
    #code to deal with not finding temperature data.
}

if( $text =~ m{ (\d+ \. \d+) \s* ° F }xms){
     my $temp = $1;
...
}else{
    #code to deal with not finding temperature data.
}