Array Perl

  1. Home
  2. Perl
  3. Array
  4. A program that prints every element of an array
#!/usr/local/bin/perl 
@array = (14, "abc", 1.23, -7, "ddd"); 
$count = 1; 
while ($count <= @array) { 
   print("element $count: $array[$count-1]\n"); 
   $count++; 
}