title: How to compare each element of an array using regex?
body: <p>I am using the Lingua::EN::Tagger Perl module in order to tag parts of speech from a user's input. That portion of my code works perfect. However, the problem is that I only want to keep the input that has the noun tags which are "NN, NNS, NNP, NNPS", and store these words in a separate array @nounArray. The user will be inputting a question such as "what is your name?" Each element of the question will be tagged: <code>What/WP is/is your/PN name/NN</code></p>
  
  <pre><code>my @UserInput = $readable_text;
  my @nounArray;
  foreach my $UserInput (@UserInput){
  
      if ($UserInput =~ m/NN|NNS$|NNP$|NNPS$/){
  
                $UserInput = @nounArray;
      }
  print @nounArray;
  }
  </code></pre>
  
  <p>However, nothing occurs when I run the code. The goal is to have the nouns of the user's input be placed in a separate array after separating them from the original array. I do not want to print the array, but i do this in order to see if the code was working.</p>