Help for this page
Select Code to Download
Select
or
download this
print for $dom->find(q{ substring(//p,1,4) });