Я работал над модулем Perl XUL :: Gui в CPAN, который использует Firefox в качестве хост-платформы для рендеринга кроссплатформенных графических интерфейсов из Perl. Все, что вам нужно, это установить Firefox на целевые платформы. В настоящее время он находится в разработке, но может быть достаточно стабильным для ваших нужд. Вот краткий пример того, как выглядит синтаксис:
use XUL::Gui;
display Window title => 'Foo Processor',
Hbox(
(map {
my $id = $_;
CheckBox id => $id,
label => "use $id",
option => sub {shift->checked eq 'true' ? " -$id" : ()}
} qw/foo bar baz/
),
TextBox( id => 'num',
type => 'number',
option => sub {' -num ' . shift->value}
),
Button( label => 'run', oncommand => sub {
my @opts = map {$ID{$_}->option} qw/foo bar baz num/;
$ID{txt}->value = `fooproc @opts`;
}),
),
TextBox( FILL, id => 'txt' );
Поскольку он находится в стадии разработки, если у вас есть какие-либо пожелания (или какие-либо ошибки), сообщите мне.
Кроме того, поскольку вы находитесь внутри Firefox, любые веб-технологии, которые поддерживает Firefox (canvas, iframes, flash ...), полностью доступны из Perl. Для компонентов графического интерфейса вы можете использовать любую комбинацию тегов HTML и XUL.