my @need = qw/bread
    milk
    lettuce
    tomatoes/;
  push @need, 'wine';