if ($export =~ /^q.*y$|^Y/)