#!/usr/bin/perl -wT
use CGI':standard';
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
my $a = 3;
my $b = '4';
my $c = 'a';
print header();
print start_html(-title => "Concatenation");
print "<div style='color:#006666';>";
print $a . $b; print "<br>";
print $a . $c; print "<br>";
print $b . $c; print "<br>";
print $a + $b; print "<br>";
print $a + $c; print "<br>";
print $b + $c; print "<br>";
print "</div>";
print end_html();
