my @third_fragments = grep -v ($rsite3), $second_fragments[$i];

##</code><code>##

perldoc -f grep

##</code><code>##

$ perl -e 'my @number_larger_than_5 = grep {$_ > 5} 1..10; print " @number_larger_than_5";'
 6 7 8 9 10