Help for this page

Select Code to Download

Select or download this

$RLine = "R.N. Raox, J. Pure and Appl. Phys.";
$Jrnl  = "Appl. Phys.";
...
else {
    print "Not Matched\n";
}

Select or download this

$RLine = "R.N. Raox, J. Pure and Appl. Phys."; 
#Should not match -> Pattern OK
...

$RLine = "R.N. and Raox, J. Pure text Appl. Phys.";
#Should match but it is not -> Pattern NOT OK