my $last= (LIST)[-1];