Форматировать запрос Perl
Сейчас имеется формат вывода tcpdump:
tcpdump -e -tt -nn tcp | perl -pe 's/(\d*\.\d*)\s.*length\s([0-9]*):\s((?:\d+\.){3}\d+)\.(\d+)\s>\s((?:\d+\.){3}\d+)\.(\d+).*/$1 $2 $3 $4 $5 $6/'
Он выводит данные в таком виде:
Все вроде бы здорово, но мне нужно записать эти данные в БД. Есть концепция превратить все это в INSERT-запросы к MySQL такого типа:
INSERT INTO Table
VALUES ('1586092251.654965', 120, '188.170.175.84', 22029, '192.168.132.251', 1194);
И так каждую строку.
Очень плохо разбираюсь в Perl, поэтому нужна помощь. Нужно отформатировать вывод строк в конкретные запросы к БД.
Направьте в нужное русло, как я мог бы это сделать, либо помогите исправить запрос.
