Thanks for the information, but I am unable to get the QUERY_STRNG to be other then "", any thoughts

my @referers;
my $referers;
. . .
    if ($ENV{QUERY_STRING} ne "") {
        if ($ENV{'HTTP_REFERER'}) {
            foreach $referer (@referers) {
                if ($ENV{'HTTP_REFERER'} =~ m|https?://([^/]*)$referer
+|i) {
                 &begin_data_parse;
                }
            }
        }
        else { 
            print "</b>Data Passed Failed Source Check</b>";
        }
    }
    else {
            &form;
    }
[download]

it just keeps calling &form......