Help for this page

Select Code to Download

Select or download this

$string = "s005219/Doe John|John.Doe\\";
$string = ~/s\d+\/([^|]*)/;
print $1