Mega Code Archive

 

Categories / Perl / Statement

 

Using While loop the output the elements in an array

#!/usr/bin/perl -w use strict; my @names = qw(A B C D); print "processing using a while loop:\n"; my $i = 0; while ($i <= $#names) {     print "     Hello $names[$i]!\n";     $i++; }