How to Check if String contains only Alphabets in Perl - Step by Step Examples

How to Check if String contains only Alphabets in Perl ?

Answer

To check if a string contains only alphabets in Perl, you can use regular expressions or iterate through each character and check if it is an alphabet using functions like grep and lc.

✐ Examples

1 Check if String contains only Alphabets using regular expression

In this example,

We create a regular expression pattern that matches alphabets only.
We use the grep function to check if the string matches the pattern.
If the string contains only alphabets, we set contains_only_alphabets to 1, otherwise 0.
Finally, we print the result to the console.

Perl Program

$str = 'Hello123';
$contains_only_alphabets = ($str =~ /^[A-Za-z]+$/) ? 1 : 0;
print 'String contains only alphabets: ', $contains_only_alphabets;

Output

String contains only alphabets: 0

2 Check if String contains only Alphabets using loop to check each character

In this example,

We create a string named $str with a value of 'Hello123'.
We iterate through each character in the string using split and grep functions.
If any character is not an alphabet, we set $contains_only_alphabets to 0 and exit the loop.
Finally, we print the result to the console.

Perl Program

$str = 'Hello123';
@chars = split('', $str);
$contains_only_alphabets = 1;
foreach $char (@chars) {
    if ($char !~ /^[A-Za-z]$/) {
        $contains_only_alphabets = 0;
        last;
    }
}
print 'String contains only alphabets: ', $contains_only_alphabets;

Output

String contains only alphabets: 0

Summary

In this tutorial, we learned How to Check if String contains only Alphabets in Perl language with well detailed examples.

◀ Previous Next ▶