Select Code to Download

use strict;
use warnings;
...
} else {
  # file does not exist as a plain file
}

use strict;
use warnings;
...
}

close $rfh or die "cannot close:$!\n";