Like for the other simple string functions, the syntax form is as follows:

lcfirst EXPR 
lcfirst

to see a lot of fully commented examples that help you use the Perl statements and the Perl buit-in functions in your scripts.

# initialize a string variable
my $str =  "An example about lcfirst function";
my $newStr = lcfirst $str;
print "$newStr\n";
# prints: an example about lcfirst function

# store the title in a scalar string variable
my $title = "A Short Story About Myself";
# split the string and place it into an array
my @title = split / /, $title;
# now let’s iterate through the array
my $flag = 0;
foreach (@title) {
  if($flag == 0)
  {
     $flag = 1;
     next;
  }
  $_ = lcfirst;
}
# convert the array to a space-delimited string
$title = join(" ", @title);
print "$title\n";

• we store the title in $title variable
• we split the string into an array using the space delimiter
• in the foreach loop:
• we use $flag variable to bypass the first word of the string in order not to change it
• we call lcfirst against $_
• we store the new word value in $_
• we use the join function to convert the array back into the string using the space-delimiter
• finally, we print the string

A short story about myself

If you want to download the Perl lcfirst script with all the above examples included, please click here: Script download

That’s enough for now.