could someone traslate this small piece of perl code to php ?
many thanks
Jor

while ( -f <counter.lock> ) {
select ( undef, undef, undef, 0.3 );
}

open ( LOCKFILE, ">counter.lock" );
open (CD, "$count");
$counter = <CD>;
close (CD);