How to print Hollow Square Pattern in Perl - Step by Step Examples
How to print Hollow Square Pattern in Perl ?
Answer
To print a Hollow Square Pattern in Perl, you can use nested loops. The outer loop controls the rows, and the inner loop controls the columns. Conditions are used to determine whether to print stars or spaces for the pattern.
✐ Examples
1 Print Hollow Square Pattern
In this example,
- We define a subroutine named
print_hollow_square
that takes the side lengthn
as a parameter. - We use two nested
for
loops, one for rows and one for columns, to iterate through each cell of the square. - Within the loops, we use conditions to check if we are at the border or inside the square, printing stars (
*
) for the border and spaces ( - Finally, we call
print_hollow_square
with the desired side length to print the pattern.
Perl Program
sub print_hollow_square {
my ($n) = @_;
for my $i (0..$n-1) {
my $row = '';
for my $j (0..$n-1) {
if ($i == 0 || $i == $n-1 || $j == 0 || $j == $n-1) {
$row .= '*';
} else {
$row .= ' ';
}
}
print "$row\n";
}
}
my $side_length = 5;
print_hollow_square($side_length);
Output
* * * * * * * * * * * * * * * *
Summary
In this tutorial, we learned How to print Hollow Square Pattern in Perl language with well detailed examples.
More Perl Pattern Printing Tutorials
- How to print Left Half Pyramid Pattern in Perl ?
- How to print Right Half Pyramid Pattern in Perl ?
- How to print Pyramid Pattern in Perl ?
- How to print Rhombus Pattern in Perl ?
- How to print Diamond Pattern in Perl ?
- How to print Hour Glass Pattern in Perl ?
- How to print Hollow Square Pattern in Perl ?
- How to print Hollow Pyramid Pattern in Perl ?
- How to print Hollow Inverted Pyramid Pattern in Perl ?
- How to print Hollow Diamond Pattern in Perl ?
- How to print Floyd's Trianlge Pattern in Perl ?
- How to print Pascal's Triangle Pattern in Perl ?