How to check if a Set is Not Empty in Perl - Step by Step Examples
How to check if a Set is Not Empty in Perl ?
Answer
In Perl, you can use the scalar
context to check if a Set is not empty.
✐ Examples
1 Check if Set is Not Empty
In this example,
- We declare a Set using a Perl array and initialize it with some elements.
- We use the
scalar
operator in scalar context on the Set to determine its size. - If the size of the Set is greater than 0, it means the Set is not empty; otherwise, it is empty.
- We print the result to the standard output to indicate whether the Set is not empty or not.
Perl Program
# Initialize a Set
my @set = (1, 2, 3); # Or my @set;
# Check if Set is not empty
if (scalar @set) {
print 'The Set is not empty\n';
} else {
print 'The Set is empty\n';
}
Output
The Set is not empty
2 Check if Empty Set is Not Empty
In this example,
- We declare an empty Set using a Perl array.
- We use the
scalar
operator in scalar context on the Set to determine its size. - Since the size of the Set is 0, it means the Set is empty.
- We print the result to the standard output to indicate that the Set is indeed empty.
Perl Program
# Initialize an empty Set
my @empty_set;
# Check if Empty Set is not empty
if (scalar @empty_set) {
print 'The Set is not empty\n';
} else {
print 'The Set is empty\n';
}
Output
The Set is empty
Summary
In this tutorial, we learned How to check if a Set is Not Empty 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 ?