in reply to using split

dont use split use this
perl -e 'my $blah = "reagen OR siedl OR smith AND jack"; @names = spli +t /\s+( AND|OR)\s+/, $blah; @split_values = $blah =~ /\s+(AND|OR)\s+/g'