$db_date =~s/[^\d]//g;
[download]

That is usually written as:

$db_date =~ s/\D//g;
[download]

Or better as:

$db_date =~ s/\D+//g;
[download]

Or even better as:

$db_date =~ tr/0-9//cd;
[download]

foreach( glob("$search_local/$missing_file") ){
if (-e $_)
[download]

It looks like you are looking for a single file so there is no need for the glob and foreach loop, just the -e test should be enough.

goto search2;
[download]

That is ususally written as:

last;
[download]

But since you don't really need the loop that is moot.