How to Initialize a Set in Perl - Step by Step Examples

◀ Previous Next ▶

How to Initialize a Set in Perl ?

Answer

To initialize a set in Perl, you can use a hash where the keys represent the elements of the set.

✐ Examples

1 Initialize Set with Elements

In this example,

We declare a hash variable named %my_set.
We initialize %my_set with elements by setting the keys of the hash to the desired elements, and the values to a placeholder value (such as 1).
This method simulates a set by ensuring that all keys (elements) are unique.
We can now manipulate %my_set using hash operations such as adding elements, removing elements, and checking for membership.

Perl Program

# Initialize a set with elements using a hash
my %my_set = ("apple" => 1, "banana" => 1, "orange" => 1);

# %my_set is now initialized with elements "apple", "banana", and "orange"

# Example usage:
# Add an element to the set
$my_set{"kiwi"} = 1;

# Remove an element from the set
delete $my_set{"banana"};

# Check if an element is present in the set
my $contains_element = exists $my_set{"apple"};

print "Is element 'apple' present in the set: ", $contains_element ? "true" : "false", "\n";

Output

Is element 'apple' present in the set: true

2 Initialize Empty Set

In this example,

We declare an empty hash variable named %empty_set.
We initialize %empty_set using an empty hash.
This creates an empty set-like structure that is ready to be used for storing unique elements.
We can now manipulate %empty_set using hash operations such as adding elements, removing elements, and checking for membership.

Perl Program

# Initialize an empty set using a hash
my %empty_set = ();

# %empty_set is now initialized as an empty set

# Example usage:
# Add elements to the set
$empty_set{"apple"} = 1;

# Remove elements from the set
delete $empty_set{"apple"};

# Check if an element is present in the set
my $contains_element = exists $empty_set{"apple"};

print "Is element 'apple' present in the set: ", $contains_element ? "true" : "false", "\n";

Output

Is element 'apple' present in the set: false

Summary

In this tutorial, we learned How to Initialize a Set in Perl language with well detailed examples.

◀ Previous Next ▶