Мне необходимо написать программу, которая из введённого текста указывает самое короткое слово, начинающееся на указанную букву.
нужно использовать стандартные функции работы со строкой
Какие функции нужно использовать,поделитесь пожалуйста)
Есть код на delphi,но как написать его на php не знаю!

var
l,p:string;
i,k,c:integer;
z:char;

begin
writeln('vvedi bukvu');
readln(z);
writeln('vvedi slova');
readln(l);

p:=l;
for i:=1 to Length(l) do

begin
if (l[i]=z) and ((l[i-1]=' ') or (i=1)) then k:=i;

c:=k;
if Length(l)=i then c:=k-1;

if ((l[i]=' ') or (i=Length(l)))
and (l[k]=z)
and ((Length(p)=Length(l)) or (i-k<Length(p)))
then p:=copy(l,k,i-c);
end;

if p=l then writeln('netu slov na takuy bukvu')
else writeln('min slovo=',p);

readln;
end.
надеюсь на вашу помощь!