use strict; use warnings; use CGI qw(:all); my $cgi = new CGI; my $this_url = $cgi->url(); #Save this script's url my $first = $cgi->param('first_name'); my $last = $cgi->param('last_name'); my $file = $first . '_' . $last . '.csv'; open(DF,'<',$file); foreach my $line() { print $line; } close(DF); print "Content-type:text/html\n\n"; print <Generating Self-Referential URLs
Circle:
Technology:

The name you entered was '$first $last'

The name you entered was '$file'

EndOfHTML