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