Help for this page

Select Code to Download

Select or download this

$sentence = "happy JJ
             Boy NN
             kick VB
             jump VB";

Select or download this

if ($sentence =~ /(Boy\sNN)(.|\n}*(\w+\s\VB)/) {
    $node = $1.' '.$3;
    print $node;
}