use File::Spec; my $file = File::Spec->catfile($protected_folder, $protected{'file'}); #### print "Content-type: text/plain", "\n"; print "Status: 404 Not Found", "\n\n";