#!/usr/bin/perl -w

use CGI qw/:standard/;

if (param) {
        my @values = param('name');
}

print header, start_html, start_form;

print textfield(-name=>'name',
                -default=>$values[0],
                -override=>1);
                
print textfield(-name=>'name',
                -default=>$values[1],
                -override=>1);
                
print submit, end_form, $values[0], $values[1], end_html;