In Perl, you can use a negative array index to specify how far from the end of the array you are referring to. This will do what you want:

@array = q( hi bye see do );
my $lastword = $array[-1];
[download]

_______________
D a m n D i r t y A p e
Home Node | Email