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++; }