#!/usr/bin/perl
  
# String whose length is to be calculated
orignal_string = "Geeks for Geeks";
  
# Function to calculate lengthstring_len = length(orignal_string);
  
# Printing the Length
print "Length of String is:string_len";

Length of String is: 15

#!/usr/bin/perl
  
# String whose length is to be calculated
orignal_string = "123456 is Geeks Code";
  
# Function to calculate lengthstring_len = length(orignal_string);
  
# Printing the Length
print "Length of String is:string_len";

Length of String is: 20