my $line ='Lorem ipsum dolor sit amet, consectetur adipisicing elit.' #### # note that this contain phrases and single words. my @array = ('ipsum', 'sit amet', elit'); #### $VAR = ['Lorem', 'dolor','consectetur', 'adipisicing'];