How to create a Three Dimensional Array in Perl - Step by Step Examples
How to create a Three Dimensional Array in Perl ?
Answer
To create a Three Dimensional Array in Perl, you can use arrays or nested arrays.
✐ Examples
1 Creating a 3D Array with Nested Arrays
In this example,
- We use arrays of arrays of arrays to create a 3D array.
- The first dimension represents the outer array, the second dimension represents the middle array, and the third dimension represents the inner array.
Perl Program
# Creating a 3D Array with Nested Arrays
use strict;
use warnings;
my @three_d_array;
for my $i (0..2) {
for my $j (0..1) {
for my $k (0..3) {
$three_d_array[$i][$j][$k] = 0;
}
}
}
# Modify an element
$three_d_array[1][0][2] = 5;
# Print the array
for my $i (0..2) {
for my $j (0..1) {
print join(' ', @{$three_d_array[$i][$j]}), "\n";
}
print "\n";
}
Output
0 0 0 0 0 0 5 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
Summary
In this tutorial, we learned How to create a Three Dimensional Array in Perl language with well detailed examples.
More Perl Arrays Tutorials
- How to Declare an Array in Perl ?
- How to Initialize an Array in Perl ?
- How to Access Array Elements in Perl ?
- How to Access Array Elements using Index in Perl ?
- How to get First Element in Array in Perl ?
- How to get Last Element in Array in Perl ?
- How to check if an Array is Empty in Perl ?
- How to check if an Array is Not Empty in Perl ?
- How to get Sub Array in Perl ?
- How to Get Array Length in Perl ?
- How to Iterate Over an Array in Perl ?
- How to Iterate Over an Array in Reverse Order in Perl ?
- How to get the Index of Specified Element in an Array in Perl ?
- How to check if Specified Element is present in the Array in Perl ?
- How to count the Number of Occurrences of Specified Element in the Array in Perl ?
- How to Sort an Array in Perl ?
- How to Sort an Array in Ascending Order in Perl ?
- How to Sort an Array in Descending Order in Perl ?
- How to create a Two Dimensional Array in Perl ?
- How to Iterate over a Two Dimensional Array in Perl ?
- How to create a Three Dimensional Array in Perl ?
- How to Copy an Array in Perl ?
- How to Split an Array in Perl ?
- How to Join Arrays in Perl ?
- How to check if Two Arrays are Equal in Perl ?
- How to check if Two Arrays have Same Elements (Regardless of Order) in Perl ?
- How to Convert an Array of Integers to an Array of Strings in Perl ?
- How to Convert an Array of Strings to an Array of Integers in Perl ?
- How to Reverse an Array in Perl ?
- How to Shuffle an Array in Perl ?
- How to Rotate Elements in an Array in Perl ?
- How to Filter Elements of an Array based on a Condition in Perl ?
- How to Declare an Integer Array in Perl ?
- How to Declare a Float Array in Perl ?
- How to Declare a String Array in Perl ?
- How to Remove Duplicates in an Array in Perl ?
- How to Remove Specific Element from an Array in Perl ?
- How to Remove Element from Array based on a Condition in Perl ?
- How to Sort a String Array in Dictionary Order in Perl ?
- How to Concatenate Strings in Array in Perl ?