Выполнение Shell-сриптов в Perl

[skeletor]

Есть скрипт на perl. Где-то в средине скрипта нужно выполнить команду, точнее получить вывод от команды

Код: Выделить всё

ID=`echo "select * from TABLE where FIELD like '%$1%'" | mysql DB_NAME -uDB_USER -pUSER_PASS | grep -v id`

то есть, использовать результат переменной ID дальше в скрипте. Пробовал использовать system, но куда она возвращает результат?

[Хостинг HostFood.ru]

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

[hizel]

http://perldoc.perl.org/perlopentut.html
раздел Pipe Opens

а нелучше использовать нативные perl DBI функции работы с мускулом?

[skeletor]

А как потом прикрутить grep?

[lexy]

А как потом прикрутить grep?

есть нативная функция в перл, скажу название - не поверишь! ))))))