#!/usr/bin/perl --
use warnings;
use strict;
use CGI::Carp qw(fatalsToBrowser);
use CGI qw(header param :standard);
print header;
my $value;
$value = param('tapas');
print start_html;
print "Your favorite Tapas place in Barcelona was $value";
print end_html;