#!PERL.EXE -w use strict; my $a=1; # number, not integer! my $b="2"; # string #my $b="2x"; # string #my $b="x2"; # string my $c= $a . $b; my $d= $a + $b; print "($c) ($d)\n";