#!/usr/bin/perl use CGI ':cgi-lib'; my %data = $ENV{'QUERY_STRING'};