|
|
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)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/3931b5d2e8f4.html, оценка из 5, голосов 10
|