sub handler {
	my $r = shift;
	return Apache2::Const::DECLINED 
          if (-d $r->filename || -f $r->filename);
        ...