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