in reply to Sentances from arrays
my $sentence = join @array > 2 ? ', ' : ' ', @array > 1 ? ( @array[0..$#array-1], 'and '.$array[-1] +) : @array; [download]
-- Casey I am a superhero.