How to get First Character in String in Perl

How to get First Character in String in Perl ?

In Perl, you can use array-like indexing or the substr function to get the first character of a string.

In this example,

We assign a string variable named $str with a value of "Hello World".
We then access the first character using array-like indexing with index 0 on the string $str or the substr function with parameters 0 and 1 to get the first character.
Finally, we print the first character.

$str = "Hello World";
$first_char = substr($str, 0, 1);
print "First character: $first_char\n";

First character: H

In this example,

We assign a string variable named $str with a value of "apple".
We then access the first character using array-like indexing with index 0 on the string $str or the substr function with parameters 0 and 1 to get the first character.
Finally, we print the first character.

$str = "apple";
$first_char = substr($str, 0, 1);
print "First character: $first_char\n";

First character: a

In this tutorial, we learned How to get First Character in String in Perl language with well detailed examples.