Question

1. Write a Perl script to concatenate "This is String One" and "This is String Two". Print all three strings, one per line with its length.

Answer 1

$s1= "This is String One";

$s2 = "This is String Two";

$concat_string = $s1.$s2;

print "$s1".length($s1)."\n";

print "$s2".length($s2)."\n";

print "$concat_string".length($concat_string)."\n";