Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexander Gaiduk                     2:5020/400     23 May 2000  21:07:36
 To : All
 Subject : Re: вопрос
 -------------------------------------------------------------------------------- 
 
 >мне надо проверить из скрипта наличие прожки unzip
 >system("which unzip");
 >а как мне перехватить в скрипт то что этот вызов выведет на экран?
 >
 на первое тебе уже ответили,
 а на второе нашел вот такое:
 
 $hdp = `hdparm -t -T \/dev\/hda`;
 print "$hdp\n";
 local ( $_, $_, $buffered, $buffer_cache ) = split( /\n/, $hdp);
 ( $_, $buffered ) = split( /=/, $buffered );
 ( $_, $buffer_cache ) = split( /=/, $buffer_cache );
 print "buffered = $buffered\n";
 print "buffer_cache = $buffer_cache\n";
 перехват выхлопа и разбор полетов.
 зы. работает около 15 сек, не срубай ее.
 
 =GAV
 --- ifmail v.2.15dev5
  * Origin: InterGalactic MegaTrash Co. (2:5020/400)
 
 

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

 Тема:    Автор:    Дата:  
 Re: вопрос   Alexander Gaiduk   23 May 2000 21:07:36 
 вопpос   Maxim Alekseev   27 May 2000 21:43:54 
 Re: вопpос   Artem Chuprina   29 May 2000 17:10:58 
Архивное /ru.perl/3931b5d2e8f4.html, оценка 1 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional