#!/usr/bin/perl -w use strict; my @array = (2, 4, 6, 8); print "the last element is: ", $array[$#array], "\n";