Pokaż wyniki 1 do 3 z 3

Temat: Perl - dopasowanie wzorca

  1. #1
    Zarejestrowany
    Oct 2009
    Postów
    2

    Domyślnie Perl - dopasowanie wzorca

    Mam taki problem - dopasowanie prostego wzorca ale do tablicy
    mam coś takiego

    Kod php:
    @Typ="Command: upload cfg_toTFTP $IP dlink
     Connecting to server................... Done. 
     Upload configuration................... Done. "
    ;

    if (@
    Type = /Done/) {
    print 
    "OK  \n";
    }else{
    print 
    "NO \n ";

    chciał bym osiągnąć ze jeśli w całej tablicy wystąpi słowo Done to ma wypisać OK

  2. #2
    Avatar GSG-9
    GSG-9 jest offline Shapeshifter
    Zarejestrowany
    Jul 2007
    Skąd
    C:\Perl\bin
    Postów
    1,578

    Domyślnie

    Kod php:
    @Typ="Command: upload cfg_toTFTP $IP dlink
     Connecting to server................... Done. 
     Upload configuration................... Done. "
    ;

    if ( @
    lol grep( /Done/,@Typ ) ) {
       print 
    "OK\n";
    }
    else {print 
    "NO\n";} 
    War, war never changes.

  3. #3
    Zarejestrowany
    Oct 2009
    Postów
    2

    Domyślnie

    Dzięki , działa

Podobne wątki

  1. [Perl] Kurs Perl - cz.1 - wprowadzenie i podstawy
    By TQM in forum Perl/Python/TCL/Prolog
    Odpowiedzi: 22
    Autor: 10-27-2014, 00:50
  2. Odpowiedzi: 18
    Autor: 07-14-2009, 11:55
  3. Perl los
    By Hardiel in forum Perl/Python/TCL/Prolog
    Odpowiedzi: 7
    Autor: 05-22-2008, 14:21
  4. Odpowiedzi: 31
    Autor: 05-20-2008, 17:01

Zasady Postowania

  • Nie możesz zakładać nowych tematów
  • Nie możesz pisać wiadomości
  • Nie możesz dodawać załączników
  • Nie możesz edytować swoich postów
  •  
Subskrybuj

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52