Concatenate string
#!/usr/bin/perl $name="Tom"; $name .= " and"; # Concatenate string print "$name is the girl's version of Dan.\n";