Select Code to Download

$pos = 0;
while ($m = shift @markers) {
...
    last if (($pos = index $htmlfile, '"', $pos) < 0);
    substr($htmlfile, $pos, 0) = $m;
}