my $a = "wolf";
my $pled = $a . ".pl";
# $pled is now "wolf.pl"