Страница 1 из 1
Perl. Передать вывод команды в массив.
Добавлено: 2011-01-14 15:41:57
Termitnik
В перловом скрипте необходимо вывод команды df передать в массив. Делаю
@array = (system(df));
не выходит. Подскажите, как правильно.
Re: Perl. Передать вывод команды в массив.
Добавлено: 2011-01-14 16:48:31
thefree
Код: Выделить всё
[root@or ~]# df -h
Файловая система Разм Исп Дост Исп% смонтирована на
/dev/mapper/VolGroup00-LogVol00
36G 20G 14G 60% /
/dev/hda1 99M 21M 74M 22% /boot
tmpfs 252M 0 252M 0% /dev/shm
/dev/hdd1 151G 128G 17G 89% /mnt/hdd1
[root@or ~]# perl -e 'my @ar = `df -h`; print $ar[3]'
/dev/hda1 99M 21M 74M 22% /boot