The OpenNET Project
 
Поиск (ключи):    ПРОГРАММЫ СТАТЬИ СОВЕТЫ ФОРУМ
  WIKI НОВОСТИ (+) MAN'ы ДОКУМЕНТАЦИЯ

Скрипт для просмотра открытых табов в Firefox
Иногда требуется узнать какие вкладки оставлены открытыми в Firefox, запущенном на другой машине. 

Ниже представленный Perl-скрипт выводит из файла sessionstore.js список
открытых табов в формате "url заголовок":
  
print_open_tabs.pl:

   #!/usr/bin/perl

   use strict;
   use JSON;
  
   # Читаем содержимое в файл
   my $json_text = <>;
   # Преобразуем JSON-блок в хэш, предварительно убирая лидирующие скобки
   my $perl_scalar = from_json(substr($json_text,1,-1), {utf8 => 1});

   # Последовательно перебираем открытые окна и табы
   foreach my $windows_block (@{$perl_scalar->{windows}}){
       foreach my $tabs_block (@{$windows_block->{tabs}}){
           # выводим активные табы по их индексу
           if ($tabs_block->{"index"} > 0){
               my $idx = $tabs_block->{"index"}-1;
               print "$tabs_block->{entries}[$idx]{url}\t$tabs_block->{entries}[$idx]{title}\n";
           }
       }
   }

Пример использования:

   ./print_open_tabs.pl ~/.mozilla/firefox/*.default/sessionstore.js
 
18.08.2010
Раздел:    Корень / Программисту и web-разработчику / Perl / Полезные подпрограммы на Perl / Подпрограммы для WEB

Обсуждение [ RSS ]
 
  • 1, кдпзу, 00:54, 20/08/2010 [ответить] [смотреть все]
  • +/
    можно добавить
    binmode STDOUT, ":utf8";

    чтобы избежать:
    Wide character in print at

     

    Ваш комментарий
    Имя:         
    E-Mail:      
    Заголовок:
    Текст:

     Добавить заметку
     Версия для печати
     
     Поиск заметки:
     

    Последние заметки
    - 05.02 Проброс 802.1q/access порта в Linux через IP-сеть
    - 25.01 Использование systemtap для устранения уязвимости в реализации /proc/pid/mem
    - 24.01 Мониторинг загрузки многоядерного сервера по каждому ядру в отдельности в Linux
    - 23.01 Осуществление ОGSM/SMS/USSD вызовов с использованием утилиты mdbus
    - 13.01 Интерактивный firewall в Linux
    - 08.01 Советы по увеличению автономной работы ноутбука с Debian/Ubuntu
    - 31.12 Бэкап и восстановление данных из БД memcachedb и других хранилищ на базе BerkeleyDB
    - 28.12 Получение инкрементальных diff-файлов для subversion
    - 27.12 Решение проблемы поддержки php-zip-extension в Fedora-16
    - 25.12 Настройка сетевого доступа в окружениях QEMU
    RSS | Следующие 15 записей >>


    АКЦИЯ! ПОДПИШИСЬ на журнал Linux Format до 31 января 2012 года и выиграй СУПЕРПРИЗ!

    Журнал "Linux Format" (Линукс Формат)- Единственный в России и странах СНГ журнал на русском языке, посвящённый Linux и свободному ПО. Журнал для IT-директоров, IT-менеджеров, программистов, системных администраторов, учителей школ и преподавателей ВУЗов и всех пользователей ПК. В каждом выпуске: Новости индустрии OpenSource, обзоры новинок свободного ПО, обучающие и методические статьи.

    Каждый, кто оформит подписку, получает бонус- объёмные наклейки на системный блок и подарки: с одним из первых выпусков журнала в 2012 году- диск с архивом номеров за 2005-2011 г.г. и ежемесячно электронную версию журнала в pdf-формате.

    Подробнее о проведении акции вы можете прочитать на странице сайта.


      Закладки на сайте
      Проследить за страницей
    Created 1996-2012 by Maxim Chirkov  
    ДобавитьРекламаВебмастеруГИД  
    RUNNet TopList