arrays.pl

#!/usr/bin/perl


print "content-type: text/html \n\n";#HTTP HEADER

# DEFINE AN ARRAY
@coins = ("Quarter","Dime","Nickel");

# PRINT THE ARRAY
print "@coins";
print "<br />";
print @coins;