#!/usr/bin/perl -wT
use strict;
use CGI;
my $q = CGI->new;
my @vars = $q->param; # <-- That's all there is to getting 'em