ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Yury Kopyl                           2:5020/400     07 Aug 2002  11:17:16
 To : Igor
 Subject : Re: Замучался с Archive::Zip !!!
 -------------------------------------------------------------------------------- 
 

 Hекто Igor  по поводу "Замучался с Archive::Zip !!!" нашкрябал(а) следующее:
 
  I> САБЖ! Покажите реальный пример зазиповки одного файла и его же
  I> раззиповки. Спасибо.
 
 $zip_file="SERV_ALL.ZIP";
 $txt_file="SERV_ALL.TXT";
 $zip = Archive::Zip->new();
 die 'Can\'t read $zip_file' unless $zip->read($zip_file) == AZ_OK;
 
 $zip->extractMember($txt_file);
 
 $text=$zip->contents($txt_file);
 в $text содержимое файла $txt_file.
 
  Yury Kopyl aka hrg | http://id.totem.ru | "бысто сп..ил и ушел - называется
 нашел..."
 -- 
 Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
 --- ifmail v.2.15dev5
  * Origin: Talk.Mail.Ru (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    Замучался с Archive::Zip !!!   Igor   07 Aug 2002 10:29:58   Re: Замучался с Archive::Zip !!!   Yury Kopyl   07 Aug 2002 11:17:16