Select Code to Download

$sentence = " he PP
       study VB
...

# print the new sentence
print $sentence . "\n";

 $sentence = "A~~~one~A and A~~~two~A";
 $sentence =~ m/A~~~(.*)~A/g;
 print $1;