How to create a Set of Strings in Perl - Step by Step Examples
How to create a Set of Strings in Perl ?
Answer
In Perl, you can use a hash to create a collection of unique strings.
✐ Examples
1 Create Set of Strings in Perl
In this example,
- We create a new hash named
%stringSet
to store strings. - We add strings to the hash as keys with a dummy value, such as
1
. - The resulting hash contains unique strings as keys.
Perl Program
# Create a hash of strings
my %stringSet;
# Add strings to the hash
$stringSet{'Apple'} = 1;
$stringSet{'Banana'} = 1;
$stringSet{'Cherry'} = 1;
# Print the hash
use Data::Dumper;
print Dumper(\%stringSet);
Output
$VAR1 = { 'Banana' => 1, 'Apple' => 1, 'Cherry' => 1 };
2 Check if Set Contains a String
In this example,
- We use the exists function to check if a specific key exists in the hash.
- The exists function returns true if the key exists, otherwise false.
Perl Program
# Check if the hash contains a key
my $containsBanana = exists $stringSet{'Banana'};
print "Hash contains Banana: $containsBanana\n";
Summary
In this tutorial, we learned How to create a Set of Strings in Perl language with well detailed examples.
More Perl Sets Tutorials
- How to create an Empty Set in Perl ?
- How to Initialize a Set in Perl ?
- How to Get Length of a Set in Perl ?
- How to create a Set of size N in Perl ?
- How to create a Set of Numbers from 1 to N in Perl ?
- How to create a Set of integers in Perl ?
- How to create a Set of Strings in Perl ?
- How to Access Items in a Set in Perl ?
- How to get a Random Item in a Set in Perl ?
- How to Iterate Over a Set in Perl ?
- How to check if a Set is Empty in Perl ?
- How to check if a Set is Not Empty in Perl ?
- How to get Subset from a Set in Perl ?
- How to check if a Specific Item is present in the Set in Perl ?
- How to check if a Set contains all the items of Another Set in Perl ?
- How to Sort Items of a Set in Perl ?
- How to Copy a Set in Perl ?
- How to add an Item to a Set in Perl ?
- How to find Union of Two Sets in Perl ?
- How to find Intersection of Two Sets in Perl ?
- How to check if Two Sets are Equal in Perl ?
- How to Convert a Set of Integers to a Set of Strings in Perl ?
- How to Convert a Set of Strings to a Set of Integers in Perl ?
- How to Convert a Set of Floats to a Set of Strings in Perl ?
- How to Convert a Set of Strings to a Set of Floats in Perl ?
- How to Filter Items of a Set based on a Condition in Perl ?
- How to Remove Specific Item from a Set in Perl ?
- How to Remove Items from Set based on a Condition in Perl ?
- How to create a Set of Sets in Perl ?