Поклеил панорамы
Apr. 25th, 2010 12:11 amПоставил hugin под убунтой — стало лучше: в отличие от мандривы, требуется меньше телодвижений: почти не надо елозить мышью — всю работу по поиску ключевых точек (ну или почти всю) autopano-sift выполняет самостоятельно — в мандриве требовалось указать хотя бы одну пару (а лучше три) для всех соседних картинок. На больших панорамах, по десятку снимков, это утомляло. Особенно когда вместо мыши использовался ноутбучный тачпад..

Попутно написал на перле quick and dirty добытчик превьюшек из RSS-потока. Было, в общем-то, три варианта:

Чую, что надо было всё-таки каким-нибудь из первых двух методов пользоваться, но поленился читать мануалы. Стыд и позор.

Попутно написал на перле quick and dirty добытчик превьюшек из RSS-потока. Было, в общем-то, три варианта:
- Аккуратно разобрать полученный XML (на CPAN есть всякие модули).
- Взять с полки книжку, вспомнить про XSLT и сделать именно на нём. Можно даже без перла.
- Тупо выдрать нужное регекспами.
while ( $content =~ s{<item>(.+?)</item>}{}s ) {
local $_ = $1;
my ( $title ) = m{<title>(.+?)( / .+?)?</title>};
my ( $link ) = m{<link>(.+?)</link>};
my ( $src ) = m{<media:thumbnail\s+url="(.+?)"};
print qq{<a href="$link"><img src="$src" alt="$title" title="$title"></a> };
}
Выдаёт такой список:




Чую, что надо было всё-таки каким-нибудь из первых двух методов пользоваться, но поленился читать мануалы. Стыд и позор.