Oversæt fra asp til php

En som lige kan oversætte det her volapyk til regulær dansk(php) ?

Har selv prøvet, men der er nogle funktioner fra asp jeg fatter hat af.

<%
'Rutinen der tjekker om CPR nummeret er gyldigt.
function cprOK(cpr)
if len(cpr) = 10 then
a = mid(cpr, 1, 1)
b = mid(cpr, 2, 1)
c = mid(cpr, 3, 1)
d = mid(cpr, 4, 1)
e = mid(cpr, 5, 1)
f = mid(cpr, 6, 1)
g = mid(cpr, 7, 1)
h = mid(cpr, 8, 1)
i = mid(cpr, 9, 1)
j = mid(cpr, 10, 1)
if ((4*a + 3*b + 2*c + 7*d + 6*e + 5*f + 4*g + 3*h + 2*i + j) mod 11 = 0) then
cprOK = true
else
cprOK = false
end if
else
cprOK = false
end if
end function

'Testprogram
if (cprOk("1710819999")) then
response.write("Gyldigt")
else
response.write("IKKE Gyldigt")
end if
%>