my ($file) = $ENV{'QUERY_STRING'} =~ /([-\w_]+\.($ext))/g;