my $query = @ARGV ? CGI->new({ @ARGV }) : CGI->new;