Вопросы с тегом «perl»

Я просто прыгаю в Unix из другого мира, и хотел знать, если while true do /someperlscript.pl done В самом скрипте perl есть средство просмотра папок / файлов, которое выполняется при изменении файлов в целевом местоположении. Это while trueхорошая идея? Если нет, то какой предпочтительный надежный подход? ТИА РЕДАКТИРОВАТЬ: так как …

19 shell  perl 

Когда я делаю 'top', я вижу процесс сценария perl в состоянии 'S'. Есть ли способ узнать, что заставляет этот perl-процесс переходить в состояние сна и как его разбудить? Любой способ отладки, чтобы дать больше информации о строках в скрипте perl, переводя его в состояние «S».

19 linux  process  perl  administration  top 

Ubuntu 10.10 поставляется с предустановленным Perl 5.10.1, но, как ни странно, perldocне входит в пакет. $ perldoc You need to install the perl-doc package to use this program. Как я могу сделать эту функцию доступной?

17 ubuntu  perl  software-installation 

Хотелось бы, чтобы каждая строка в файле повторялась фиксированное количество раз. например, каждая строка повторяется четыре раза: a b c будет выглядеть так: a a a a b b b b c c c c Я провел некоторый поиск, и есть много вопросов и ответов, в том числе и в …

17 text-processing  sed  awk  perl 

Я хотел бы открыть терминал, разделить его, скажем, на 9 частей (3х3) и выполнить некоторый скрипт bash. Но для каждой терминальной части свой скрипт. Это можно сделать с помощью Perl, Python или даже Bash? Как я могу переключаться между этими маленькими терминалами, не используя сочетания клавиш? О, кстати, я использую …

17 bash  shell-script  terminal  perl  gnome-terminator 

У меня есть несколько файлов, которые я хочу обновить, заменив одну многострочную строку другой многострочной. Что-то вроде: * Some text, * something else * another thing И я хочу заменить его на: * This is completely * different text В результате будет получено, что после замены файл, содержащий первый блок …

17 text-processing  sed  awk  python  perl 

Я пишу Perl-скрипт, который анализирует лог-файлы для сбора PID, а затем проверяет, работает ли этот PID. Я пытаюсь придумать лучший способ сделать эту проверку. Очевидно, я мог бы сделать что-то вроде: system("ps $pid > /dev/null") && print "Not running\n"; Однако я бы предпочел избегать системного вызова, если это возможно. Поэтому …

16 process  perl  proc  process-management 

Я использую Solaris 10, поэтому параметры grep, включающие -f, не работают. У меня есть два файла, разделенных каналом: file1: abc|123|BNY|apple| cab|234|cyx|orange| def|kumar|pki|bird| файл 2: abc|123| kumar|pki| cab|234 Я хотел бы сравнить первые два столбца файла file2 с файлом file1 (поиск по всему содержимому файла file1 в первых двух столбцах), если …

16 shell-script  text-processing  perl 

У меня есть файл, содержащий это: 1415602803,LOGIN SUCCESS,AUTH,user2,192.168.203.63,10.146.124.73,59996,22 1415602807,LOGIN SUCCESS,AUTH,user1,172.24.31.10,172.32.1.1,48191,22 1415602811,LOGIN FAILED,AUTH,root,172.24.166.153,10.146.124.73,52506,22 1415602815,LOGIN FAILED,AUTH,user3,192.168.123.55,10.146.32.99,55750,22 Я хочу преобразовать отметку времени в дату в этом формате: 2014-11-10 02:00:03,LOGIN SUCCESS,AUTH,user2,192.168.203.63,10.146.124.73,59996,22 2014-11-10 02:00:07,LOGIN SUCCESS,AUTH,user1,172.24.31.10,172.32.1.1,48191,22 2014-11-10 02:00:11,LOGIN FAILED,AUTH,root,172.24.166.153,10.146.124.73,52506,22 2014-11-10 02:00:15,LOGIN FAILED,AUTH,user3,192.168.123.55,10.146.32.99,55750,22 Как я могу это сделать? Я знаю, что это работает: perl -pe 's/(\d+)/localtime($1)/e'(из этого …

15 text-processing  awk  perl 

[root@server]# awk '!seen[$0]++' out.txt > cleaned awk: (FILENAME=out.txt FNR=8547098) fatal error: internal error Aborted [root@server]# «Сервер» имеет: 8 ГБ ОЗУ + 16 ГБ SWAP, x> 300 ГБ свободного места, amd64, настольный ЦП. Научный Linux 6.6. На нем больше ничего не работает, чтобы сделать LOAD. Awk прерывается через несколько секунд .. …

14 text-processing  sed  awk  perl 

У меня есть файл с этими строками G8 = P(G1,G3) G9 = P(G3,G4) G12 = P(G2,G9) G15 = P(G9,G5) G16 = P(G8,G12) G17 = P(G12,G15) Мне нужен вывод как G1,G3 G3,G4 ..... Как я могу сделать это с помощью команды sed / grep или с помощью perl?

14 sed  grep  perl 

У меня есть несколько текстовых файлов, которые я использую, чтобы делать заметки - просто обычный текст, обычно просто использующий cat >> file. Иногда я использую пустую строку или две (просто возврат - символ новой строки), чтобы указать новую тему / направление мысли. В конце каждого сеанса, перед закрытием файла с …

14 scripting  sed  awk  perl  filter 

У меня есть текстовый файл с разделителями табуляции input.txt размером около 30 КБ, я хотел бы проверить каждую строку (строки s1..s30K) на наличие пропущенного значения (т. Е. Пробела) и заполнить пропущенное значение нулевым значением. См. Out.txt input.txt id no1 no2 no3 no4 s1 23 34 45 12 s2 4 4 …

13 text-processing  sed  awk  perl 

Мне нужен вывод grep с контекстом, цветом и пустыми строками в качестве разделителя групп. В этом вопросе я узнал, как определить custom group-separator, и я построил свою команду grep следующим образом: grep --group-separator="" --color=always -A5 но разделитель группы на самом деле не пуст, вместо этого он все еще содержит код …

12 grep  perl  colors 

Мой друг указывает, что если вы делаете: perl -pi.bak -e 's/foo/bar/' somefile когда «somefile» на самом деле является символической ссылкой, perl делает то, что говорят документы: Это делается путем переименования входного файла, открытия выходного файла с исходным именем и выбора этого выходного файла в качестве операторов по умолчанию для print …

12 command-line  text-processing  symlink  utilities  perl