Запуск скрипта вместо скринсейвера

[_Alex_50]

Пытаюсь запускать Dream Aquarium в ubuntu как скринсейвер. Через wine запускается отлично, осталось только заставить запускаться после простоя. Собственно я нашёл как, https://forum.ubuntu.ru/index.php?topic=49202.0. Там есть скрипт на perl, но он не работает. Вот такого вида он у меня сейчас

Код: [Выделить]

#!/usr/bin/perl
my $cmd = "dbus-monitor --session \"type='signal',interface='org.gnome.ScreenSaver', member='SessionIdleChanged'\"";

open (IN, "$cmd |");

while (<IN>) {
if (m/^\s+boolean true/) {
system("wine c:/windows/DreamAquarium.scr -S");
} elsif (m/^\s+boolean false/) {
}
}Есть у кого какие идеи?

[_Alex_50]

up