How to check if a Set is Empty in Perl


How to check if a Set is Empty in Perl ?

Answer

To check if a Set is empty in Perl, you can check if the Set has any elements using the scalar function.



✐ Examples

1 Check if Set is Empty

In this example,

  1. We declare a Set named %set and initialize it with some elements, or an empty Set if there are no elements.
  2. We use the scalar function to get the number of elements in the Set %set.
  3. If the count is 0, it means the Set is empty; otherwise, it has elements.
  4. We print the result to the standard output to indicate whether the Set is empty or not.

Perl Program

my %set = (); # Or initialize with elements for a non-empty Set
my $isEmpty = scalar(keys %set) == 0;
if ($isEmpty) {
    print "The Set is empty\n";
} else {
    print "The Set is not empty\n";
}

Output

The Set is empty

2 Check if Empty Set is Empty

In this example,

  1. We declare an empty Set named %emptySet.
  2. We use the scalar function to get the number of elements in the Set %emptySet.
  3. Since the count is 0, it means the Set is empty.
  4. We print the result to the standard output to indicate that the Set is indeed empty.

Perl Program

my %emptySet = ();
my $isEmpty = scalar(keys %emptySet) == 0;
if ($isEmpty) {
    print "The Set is empty\n";
} else {
    print "The Set is not empty\n";
}

Output

The Set is empty

Summary

In this tutorial, we learned How to check if a Set is Empty 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 ?