#!/usr/bin/perl

use CGI;
use CGI::Carp 'fatalsToBrowser';
CGI::ReadParse(*in);

$foo = $in{'name_of_first_field'};
$bar = $in{'name_of_second_field'};

$withspace = "${foo}${bar}";
$withoutspace = "$foo $bar";