https://www.opennet.ru/openforum/vsluhforumID3/69796.html Иногда требуется узнать какие вкладки оставлены открытыми в Firefox, запущенном на другой машине. <br><br>Ниже представленный Perl-скрипт выводит из файла sessionstore.js список открытых табов в формате "url заголовок":<br> <br>print_open_tabs.pl:<br><br> #!/usr/bin/perl<br><br> use strict;<br> use JSON;<br> <br> # Читаем содержимое в файл<br> my $json_text = &lt;&gt;;<br> # Преобразуем JSON-блок в хэш, предварительно убирая лидирующие скобки<br> my $perl_scalar = from_json(substr($json_text,1,-1), {utf8 =&gt; 1});<br><br> # Последовательно перебираем открытые окна и табы<br> foreach my $windows_block (@{$perl_scalar-&gt;{windows}}){<br> foreach my $tabs_block (@{$windows_block-&gt;{tabs}}){<br> # выводим активные табы по их индексу<br> if ($tabs_block-&gt;{"index"} &gt; 0){<br> my $idx = $tabs_block-&gt;{"index"}-1;<br> print "$tabs_block-&gt;{entries}[$idx]{url}\t$tabs_block-&gt;{entries}[$idx]{title}\n";<br> }<br> }<br> }<br><br>Пример использования:<br><br> ./print_open_tabs.pl ~/.mozilla/firefox/*. https://www.opennet.ru/openforum/vsluhforumID3/69796.html#1 Thu, 19 Aug 2010 20:54:59 GMT можно добавить<br>binmode STDOUT, ":utf8";<br><br>чтобы избежать:<br>Wide character in print at <br>