#!/usr/bin/perl -w

use strict;
use CGI;

my $cgi = new CGI;
print $cgi->param('key1'); ### prints: value1
print $cgi->param('key2'); ### prints: value2