heresmy test form

First name:

Last name:

Phone number:

Date (MM/DD/YY):

Time (HH:MM:SS):

#your.pl #!/usr/bin/perl use strict; use warnings; use CGI ':standard'; my $firstName = param( "firstName" ); my $lastName = param( "lastName" ); my $phone = param( "phone" ); my $date = param( "date" ); my $time = param( "time" ); print header(); print start_html( -title => "form page" ); if ( $firstName =~ /^\w+$/ ) { print "

Hello there \L\u$firstName.

"; } if ( $lastName =~ /^\w+$/ ) { print "

Hello there Mr./Ms. \L\u$lastName.

"; } print end_html();