#!/usr/bin/perl -w
use strict;
use CGI;
print "content-type: text/html\n\n";

my $q = new CGI;

# Skriv ut i en fin tabell:
print "<table border>\n";
foreach my $field ( $q->param() )
{
    print "<tr><td>", $field, "<td>", $q->param($field), "\n";
}
print "</table>\n";