The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"Не работает в скрипте"
Вариант для распечатки Архивированная нить - только для чтения! 
Пред. тема | След. тема 
Форумы OpenNET: Виртуальная конференция (Public)
Изначальное сообщение [Проследить за развитием треда]

"Не работает в скрипте"
Сообщение от Сергей Петров emailИскать по авторуВ закладки on 22-Окт-04, 17:49  (MSK)
Вот это прекасно работает (если ввести в шеле):

nmblookup -A 192.168.1.24|head -2|tail -1 | /bin/awk '{ print $1 }'


а от такой перловый скрипт не работает правильно (такое впечателение, что авк вообще ничего не обрабатывает)

#! /usr/bin/perl

@b = `nmblookup -A 192.168.1.24|head -2|tail -1 | /bin/awk '{ print $1 }'`;

print "@b";


Что такое, где я не правильно что-то написал?

Заранее большое спасибо!

  Рекомендовать в FAQ | Cообщить модератору | Наверх

 Оглавление

Индекс форумов | Темы | Пред. тема | След. тема
Сообщения по теме

1. "Не работает в скрипте"
Сообщение от Brainbug Искать по авторуВ закладки(ok) on 27-Окт-04, 09:57  (MSK)
>Вот это прекасно работает (если ввести в шеле):
>
>nmblookup -A 192.168.1.24|head -2|tail -1 | /bin/awk '{ print $1 }'
>
>
>а от такой перловый скрипт не работает правильно (такое впечателение, что авк
>вообще ничего не обрабатывает)
>
>#! /usr/bin/perl
>
>@b = `nmblookup -A 192.168.1.24|head -2|tail -1 | /bin/awk '{ print $1
>}'`;
>
>print "@b";
>
>
>Что такое, где я не правильно что-то написал?
>
>Заранее большое спасибо!

Kak nibud tak:

#!/usr/bin/perl -w

open (FH,"nmblookup -A 192.168.1.24|head -2|tail -1 | /bin/awk '{ print \$1>}'") or die "Can't handle command output";
while (<FH>){
    $b=$_;
}
close FH or die "Can't close file handler";
print "$b\n";

  Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "Не работает в скрипте"
Сообщение от screepah emailИскать по авторуВ закладки(??) on 27-Окт-04, 10:36  (MSK)
>>awk '{ print \$1 }'

perl $1 обрабатывает, а должен awk

  Рекомендовать в FAQ | Cообщить модератору | Наверх

3. "Не работает в скрипте"
Сообщение от Brainbug Искать по авторуВ закладки(ok) on 27-Окт-04, 10:46  (MSK)
>>>awk '{ print \$1 }'
>
>perl $1 обрабатывает, а должен awk

Prostite ope4atalsa. Dolzno bit:
#!/usr/local/bin/perl -w

open (FH,"nmblookup -A 192.168.1.24|head -2|tail -1 | /bin/awk '{ print
\$1}'|");
while(<FH>){
        print;
}
close

Test:
[test@test perl]# last | head -1 | awk '{print $2}'
pts/0
[test@test perl]# cat 027.pl
#!/usr/local/bin/perl -w

open (FH,"last | head -1|awk '{print \$2}'|");
while(<FH>){
        print;
}
close
[test@test perl]# ./027.pl
pts/0
[test@test perl]#


  Рекомендовать в FAQ | Cообщить модератору | Наверх

7. "Не работает в скрипте"
Сообщение от Brainbug Искать по авторуВ закладки(ok) on 27-Окт-04, 11:13  (MSK)
>>>>awk '{ print \$1 }'
>>
>>perl $1 обрабатывает, а должен awk
>
>Prostite ope4atalsa. Dolzno bit:
>#!/usr/local/bin/perl -w
>
>open (FH,"nmblookup -A 192.168.1.24|head -2|tail -1 | /bin/awk '{ print
>\$1}'|");
>while(<FH>){
>        print;
>}
>close

close FH or die "Can't close file handler";

>
>Test:
>[test@test perl]# last | head -1 | awk '{print $2}'
>pts/0
>[test@test perl]# cat 027.pl
>#!/usr/local/bin/perl -w
>
>open (FH,"last | head -1|awk '{print \$2}'|");
>while(<FH>){
>        print;
>}
>close

close FH or die "Can't close file handler";

>[test@test perl]# ./027.pl
>pts/0
>[test@test perl]#


  Рекомендовать в FAQ | Cообщить модератору | Наверх

4. "Не работает в скрипте"
Сообщение от Brainbug Искать по авторуВ закладки(ok) on 27-Окт-04, 10:53  (MSK)
>>>awk '{ print \$1 }'
>
>perl $1 обрабатывает, а должен awk

V mojem primere imenno awk $1 i obrabativajet, t.k. napisano ne $1, a \$1.

  Рекомендовать в FAQ | Cообщить модератору | Наверх

6. "Не работает в скрипте"
Сообщение от Сергей Петров emailИскать по авторуВ закладки on 27-Окт-04, 11:04  (MSK)
>>>>awk '{ print \$1 }'
>>
>>perl $1 обрабатывает, а должен awk
>
>V mojem primere imenno awk $1 i obrabativajet, t.k. napisano ne $1,
>a \$1.


OK. Spasibo bol'shoe!!!

  Рекомендовать в FAQ | Cообщить модератору | Наверх

5. "Не работает в скрипте"
Сообщение от Сергей Петров emailИскать по авторуВ закладки on 27-Окт-04, 11:03  (MSK)
>>>awk '{ print \$1 }'
>
>perl $1 обрабатывает, а должен awk


СПАСИБО БОЛЬШОЕ! Все стало понятно. Разобрался! Еще раз спасибо!

  Рекомендовать в FAQ | Cообщить модератору | Наверх


Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру