#! /usr/local/bin/perl

# This example will display how to create an array and print it

@array = (1,2,3,4,5); #give the array 5 values

print "Value 1: $array[0]\n";
print "Value 2: $array[1]\n";
print "Value 3: $array[2]\n";
print "Value 4: $array[3]\n";
print "Value 5: $array[4]\n";

    Source: geocities.com/siliconvalley/vista/6493/perl/code

               ( geocities.com/siliconvalley/vista/6493/perl)                   ( geocities.com/siliconvalley/vista/6493)                   ( geocities.com/siliconvalley/vista)                   ( geocities.com/siliconvalley)