As clarification of what's been said elsewhere, you are testing the wrong element of the split ... to use your original code, change

$model =~ s/\.log$//;
die if $model =~ /log/;
[download]

to read

$ip =~ s/\.log$//;
die if $ip =~ /log/;
[download]