$tmplの中の<loop>***</loop>で囲まれた値を取り出したい。
Perlではこんな風にやってたんだけど、PHPではどないにするんだ？

$tmpl =~m[<loop>(.*?)</loop>]si;
$head = $`;
$loop = $1;
$foot = $';