How to create a Set of Strings in Perl


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,

  1. We create a new hash named %stringSet to store strings.
  2. We add strings to the hash as keys with a dummy value, such as 1.
  3. 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,

  1. We use the exists function to check if a specific key exists in the hash.
  2. 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

  1. How to create an Empty Set in Perl ?
  2. How to Initialize a Set in Perl ?
  3. How to Get Length of a Set in Perl ?
  4. How to create a Set of size N in Perl ?
  5. How to create a Set of Numbers from 1 to N in Perl ?
  6. How to create a Set of integers in Perl ?
  7. How to create a Set of Strings in Perl ?
  8. How to Access Items in a Set in Perl ?
  9. How to get a Random Item in a Set in Perl ?
  10. How to Iterate Over a Set in Perl ?
  11. How to check if a Set is Empty in Perl ?
  12. How to check if a Set is Not Empty in Perl ?
  13. How to get Subset from a Set in Perl ?
  14. How to check if a Specific Item is present in the Set in Perl ?
  15. How to check if a Set contains all the items of Another Set in Perl ?
  16. How to Sort Items of a Set in Perl ?
  17. How to Copy a Set in Perl ?
  18. How to add an Item to a Set in Perl ?
  19. How to find Union of Two Sets in Perl ?
  20. How to find Intersection of Two Sets in Perl ?
  21. How to check if Two Sets are Equal in Perl ?
  22. How to Convert a Set of Integers to a Set of Strings in Perl ?
  23. How to Convert a Set of Strings to a Set of Integers in Perl ?
  24. How to Convert a Set of Floats to a Set of Strings in Perl ?
  25. How to Convert a Set of Strings to a Set of Floats in Perl ?
  26. How to Filter Items of a Set based on a Condition in Perl ?
  27. How to Remove Specific Item from a Set in Perl ?
  28. How to Remove Items from Set based on a Condition in Perl ?
  29. How to create a Set of Sets in Perl ?