# Remove leading url
    $icon =~ s/https:\/\/api.weather.gov\/icons\/land\///;

# Split at /
    my @iconSplit = split(/\//, $icon);
    my $dayNight = $iconSplit[0];

# Split at ? to remove size info
    $icon = $iconSplit[1];
    my @iconSplit2 = split(/\?/, $icon);
    $icon = $iconSplit2[0];

# Split at , for % of precip if present
    my @iconSplit3 = split(/\,/, $icon);
    $icon = $iconSplit3[0];

    my $poP = $iconSplit3[1];
    if (not defined $poP) {
    $poP = 0; # null
}

    my %newIcons= (
        'skc'             => "clear-day.png",
        'few'             => "partly-cloudy-day.png",
        'sct'             => "partly-cloudy-day.png",
        'bkn'             => "cloudy.png",
        'ovc'             => "cloudy.png",
        'wind_skc'        => "wind.png",
        'wind_few'        => "wind.png",
        'wind_sct'        => "wind.png",
        'wind_bkn'        => "wind.png",
        'wind_ovc'        => "wind.png",
        'snow'            => "snow.png",
        'rain_snow'       => "sleet.png",
        'rain_sleet'      => "sleet.png",
        'snow_sleet'      => "sleet.png",
        'fzra'            => "sleet.png",
        'rain_fzra'       => "sleet.png",
        'snow_fzra'       => "sleet.png",
        'sleet'           => "sleet.png",
        'rain'            => "rain.png",
        'rain_showers'    => "rain.png",
        'rain_showers_hi' => "rain.png",
        'tsra'            => "thunderstorm.png",
        'tsra_sct'        => "thunderstorm.png",
        'tsra_hi'         => "thunderstorm.png",
        'tornado'         => "tornado.png",
        'hurricane'       => "thunderstorm.png",
        'tropical_storm'  => "thunderstorm.png",
        'dust'            => "fog.png",
        'smoke'           => "fog.png",
        'haze'            => "fog.png",
        'hot'             => "clear-day.png",
        'cold'            => "clear-day.png",
        'blizzard'        => "snow.png",
        'fog'             => "fog.png" 
    );

    $icon = $newIcons{$icon};