Новости | FAQ | Авторы | Документация | В действии | Библиотека |
Инструменты | Полезные ссылки | Хостинги | Скачать | Примеры | Форум |
Misha v.3 18.06.2013 12:20 / 18.06.2013 15:29
написал следующий код:@USE debug/Erusage.p @main[] $sFileSpec[/../temp/t.html] ^if(-f $sFileSpec){ $f[^file::load[text;$sFileSpec]] }{ $f[^file::load[text;http://www.tf2wh.com/overstock.php]] ^f.save[text;$sFileSpec] } $s[] $sDummy[^f.text.match[<table id="over"[^^>]*>.+?<tbody>(.+?)</tbody>][]{$s[$match.1]}] ^Erusage:measure{ $t[^s.match[<tr[^^>]*><th>(\d+)<th><font[^^>]+>([^^<]+)</font><td><i[^^>]*>(\d+)c</i><td>×^;(\d+)<td><td>(\d+)<td[^^>]*>(\d+)%][g]] }[v] ^t.save[/../temp/t.txt] Count: ^t.count[]<br /> Time: $v.time ms<br /> KB: $v.memory_kbсогласно результатам Erusage, сам match расходует меньше 400 KB и выполняется очень быстро (на моём компе).