Question

1. Write a Perl script that creates a string variable with value “This is String One”. Converts it into array, replaces value of element 2 from “String” to “Act” and transforms array back to string. Finally, it prints original string, array and transformed string.

Answer 1

Answer) The Perl code the above question is below:

# This is our input string
$sentence = "This is String One";
  
# converting the string sentence into array
# by using split() function
my @spl = split(' ', $sentence);

# changing the element at index 2 to "Act"
@spl[2]="Act";

# joining the array back to string
$str = join(" ", @spl );

# printing the original string i.e sentence
print "The Original String: ";
print "$sentence\n";

# printing the array i.e spl
print "The array after spliting: ";
print "@spl\n";

# printing the transformed string i.e str
print "The transformed String: ";
print "$str\n";

CODE SCREENSHOT

OUTPUT SCREENSHOT