Я писал модуль XUL :: Gui , который использует Firefox или XULRunner для визуализации своего графического интерфейса.Оба они кроссплатформенные (и используют нативный стиль).Графические интерфейсы создаются с использованием функциональной формы языков разметки XUL и HTML со стилем CSS.Модуль еще находится в разработке, но может быть достаточно полным для ваших нужд.Вот краткий пример:
use XUL::Gui;
display Window title => 'my window',
H2('event handling example:'),
Button(
label => 'click me',
oncommand => sub {
my ($self, $event) = @_;
$self->label = 'ouch!';
}
);
Сам модуль является чистым Perl и имеет только основные зависимости модуля, что упрощает его установку (в отличие от почти всех других наборов графических инструментов для Perl, которые требуют компиляции кода C).
Для максимальной кроссплатформенной поддержки вы также можете использовать alter ego *1009* Web :: Gui , который удаляет специфическую поддержку Mozilla XUL, но открывает дверь для рендеринга HTML.+ CSS-интерфейс с большинством современных веб-браузеров.