How to check if a Specific Item is present in the Set in Perl


How to check if a Specific Item is present in the Set in Perl ?

Answer

To check if a specific item is present in a Set in Perl, you can use the exists function.



✐ Examples

1 Check if Item is Present

In this example,

  1. We define a Set named %my_set containing elements of a specific type.
  2. We use the exists function to check if a specific item is present in the Set.
  3. The exists function returns 1 if the item is present in the Set, otherwise it returns undef.
  4. Finally, we print the result to standard output.

Perl Program

# Define Set with items
my %my_set = ("apple" => 1, "banana" => 1, "orange" => 1, "grape" => 1, "melon" => 1);

# Check if item is present
my $item = "banana";
my $is_present = exists $my_set{$item};

# Print result
print "Is $item present in the Set? ", $is_present ? "true" : "false", "\n";

Output

Is banana present in the Set? true

2 Check if Item is Not Present

In this example,

  1. We define a Set named %my_set containing elements of a specific type.
  2. We use the exists function to check if a specific item is not present in the Set.
  3. The exists function returns undef if the item is not present in the Set.
  4. Finally, we print the result to standard output.

Perl Program

# Define Set with items
my %my_set = ("apple" => 1, "banana" => 1, "orange" => 1, "grape" => 1, "melon" => 1);

# Check if item is not present
my $item = "peach";
my $is_not_present = !exists $my_set{$item};

# Print result
print "Is $item not present in the Set? ", $is_not_present ? "true" : "false", "\n";

Output

Is peach not present in the Set? true

Summary

In this tutorial, we learned How to check if a Specific Item is present in the Set 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 ?