ALWAYS use strict and warnings
unless ($dir_file eq '.' || dir_file eq '..') { should be unless ($dir_file eq '.' || $dir_file eq '..') {

Update:

btw it wont work unless the directory $disabled_htdocs already exists.

T I M T O W T D I