if ($imagefile =~ m/src=\"\//i) {
        $imagefile = "\/" . $';
    }
    elsif ($imagefile =~ m/src=\"/i) {
        $imagefile = $';
    }