LINUX.ORG.RU

Torsmo & LOR RSS


0

0

Прикольная вещь -- Torsmo. И гибкая. Я слегка подправил исходники и написал скрипт, читающий RSS с linux.org.ru и выдергивающий из него заголовки. Можно было, конечно, взять готовую читалку RSS, но так IMHO проще и компактнее. Если кому понравилось, могу скинуть скрипт.

>>> Просмотр (1280x1024, 280 Kb)

★★★★★

Проверено: Shaman007 ()

Хе, вродебы гном, но настроен как KDE по дефолту :)

За креатив зачот - ждем скрипт :)

Orlangoor ★★★★★
()

А удобно ли это?? На ссылку нет возможности кликнуть и для того, чтоб прочитать текст новости надо все-равно лезть на сайт.

user-aspirin
()

линк на тему икон можно?

kostian ★★★★☆
()

Про скрипт поддерживаю. Скрин симпатичный.

Asteronix ★★★
()

Хорошо, приятно, спакойно. Отстойник порадовал :))

anonymous
()

А оно умеет по клику на заголовке новости запускать браузер, например?

MaxL
()
Ответ на: комментарий от Zlyden

там того скрипта.... ${execi 1800 curl --silent "http://packages.gentoo.org/archs/x86/gentoo.rss"; | egrep "(title>|description>)" | sed -n '4,$p' | sed -e 's/<title>/\n/' -e 's/<\/title>//' -e 's/<description>/ /' -e 's/<\/description>//' | sort | uniq}

http://cub.ho.com.ua/fvwm_2.5.15.png результат. А кликать мне не надо, просто чтоб знать что нового в портаже появилось:)

CuB ★★
()

а в opera встроен RSS reader,

бразишь инет, и у тебя всплывает надпись L.O.R. три новые новости,
заходишь в пункт меню "Новости" и читаешь,
ИМХО очень удобно.

anonymous
()

креатив классный, а вот цвет шрифта в torsmo считаю не очень удачным

dj_kane ★★
()
Ответ на: комментарий от CuB

где угодно их можно встроить, главное задаться целью. Open Source рулит

indie
()

Скрин очень порадовал.

Anoxemian ★★★★★
()

А у кого получилось чтоб русский был и сглаживание шрифтов тоже

StreSS
()

Скрипт в студию! плз

anonymous
()

Оч приятный скрин. Респект ;)

ram32
()

Мне понравился.. мне вообще очень многие скригшоты нравятся :)

php-coder ★★★★★
()
Ответ на: комментарий от CuB

>${execi 1800 curl --silent "http://packages.gentoo.org/archs/x86/gentoo.rss";; | egrep "(title>|description>)" | sed -n '4,$p' | sed -e 's/<title>/\n/' -e 's/<\/title>//' -e 's/<description>/ /' -e 's/<\/description>//' | sort | uniq}

Тут можно упростить:

1) один sed вместо нескольких:

sed -n '4,$p;s/<title>/\n/;s/<\/title>//;s/<description>/ /;s/<\/description>//'

Вроде, так должно работать (не проверял). Но, кажется можно и еще короче. К примеру, использовать regexp для всех тегов. Но я не знаю точной задачи.. так что не стал выдумывать :)

2) sort | uniq заменить на sort -u

php-coder ★★★★★
()

предложение добавить в правила галереи пункт "сцылки на картинки указывать прямо в посте" и за нарушение бех объяснения причин - минус звездочка.

anonymous
()

Рад, что обчественность одобрила. :)
Тема иконок -- Glass (искать на gnome-look.org).
Скрипт я не стал лепить из разных утилит, а написал полностью на Perl, т.к. работать оно будет быстрее. Собственно вот:

#!/usr/bin/perl
use strict;
use warnings;
use XML::Twig;
use LWP::UserAgent;

my $count = 0;
sub item
{
return if $count++ > 4;
my $text = $_[1]->text;
$text =~ s/&quot;/"/g;
print '*';
my $length = 0;
foreach (split / /, $text) {
$length += length($_) + 1;
if ($length > 35) {
print "\n $_";
$length = length $_;
} else {
print " $_";
}
}
print "\n";
}

my $twig = XML::Twig->new(twig_handlers => {'item/title', \&item},
keep_encoding => 1);
my $ua = LWP::UserAgent->new(env_proxy => 1);
my $resp = $ua->get('http://linux.org.ru/rss.jsp');
$resp->is_success or die $resp->status_line;
$twig->parse($resp->content);
0;

Вызывать его из конфига Torsmo можно например так (обновление каждые 2 минуты):
${execi 120 perl script.pl}

anonymous
()

Извиняюсь. Еще разок в нормальном виде.

#!/usr/bin/perl
use strict;
use warnings;
use XML::Twig;
use LWP::UserAgent;

my $count = 0;
sub item
{
	return if $count++ > 4;
	my $text = $_[1]->text;
	$text =~ s/&quot;/"/g;
	print '*';
	my $length = 0;
	foreach (split / /, $text) {
		$length += length($_) + 1;
		if ($length > 35) {
			print "\n  $_";
			$length = length $_;
		} else {
			print " $_";
		}
	}
	print "\n";
}

my $twig = XML::Twig->new(twig_handlers => {'item/title', \&item}, 
	keep_encoding => 1);
my $ua = LWP::UserAgent->new(env_proxy => 1);
my $resp = $ua->get('http://linux.org.ru/rss.jsp');
$resp->is_success or die $resp->status_line;
$twig->parse($resp->content);
0;

Relan ★★★★★
() автор топика
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.