![]() |
Hei og Velkommen fra USA til UNIX og Linux Forums! Takk for besøket og Delta i vårt globale samfunn.
|
|
google unix.com
|
|||||||
| Forums | Registrer | Forum Rules | Lenker | Album | FAQ | Medlemsliste | Kalender | Søke | Dagens innlegg | Marker forumene som lest |
| Shell programmering og Skripting Post spørsmål om ksh, csh, SH, Bash, Perl, PHP, SED, awk og ANDRE shell scripts og Shell skriptespråk her. |
Mer UNIX og Linux Forum Emner Du kan finne nyttig
|
||||
| Tråd | Tråd startet | Forum | Svar | Siste innlegg |
| Regeluttrykk HJELP - PERL | maxmave | UNIX for Dummies Spørsmål og svar | 1 | 06-04-2008 12:15 |
| regeluttrykk | jack1981 | Shell programmering og Skripting | 4 | 07-12-2006 03:10 |
| Regular Expressions | sandeep_hi | Shell programmering og Skripting | 6 | 06-12-2006 02:12 |
| Perl regulære uttrykk ... | DrRo183 | Shell programmering og Skripting | 1 | 04-26-2006 09:28 |
| Regeluttrykk i sed | mfreemantle | UNIX for Dummies Spørsmål og svar | 3 | 02-11-2002 09:34 |
![]() |
|
|
LinkBack | Thread Tools | Søk i denne tråden | Rate Thread | Visningsmoduser |
|
|
|
||||
|
Regeluttrykk HJELP - PERL
Hallo,
Code:
$line=USING (FILE '/TEST1/FILENAME'5000) Jeg har prøvd ut følgende uttrykk ... Type 1: $ Var1 \u003d `sed -e 's / .* \ "/ /"-e' s \ ).*$/' $ line `; Type 2: $ Var1 \u003d `echo $ line | awk-F" \ ' "' (print $ 2) '| awk-F" \ \) "' (print $ 1) '`; Type 3: $ Var1 \u003d `echo $ line | sed 's / .* \ "/ /" | sed 's / \ ).*$//'`; Type 4: $ Var1 \u003d `echo $ line | sed 's / .* \ "/ /" | sed 's / \ )$//'`; Type 5: $ Var1 \u003d `echo $ line | sed 's / .* Arkiv / / "| sed 's / Stenger .*$//'`; Type 6: $ Var1 \u003d `echo $ line | sed 's / "/ / g' | sed 's / \) / / g' | awk-F "\ '"' (print $ 2) ' `; Type 7: $ Var1 \u003d `sed 's / .*' \ (.* \ )).*/ \ 1 / $ line `; men ingenting er trent, har jeg alltid får en feilmelding som sier at Code:
sh: -c: line 0: syntax error near unexpected token `('
Takk Rahul Sist endret av Yogesh Sawant; 06-05-2008 kl 03:56.. Årsak: lagt til kode tags |
|
||||
|
Eller, endelig, med Perl:
Code:
if ($line =~ m/'(\d+)\)/) { $Var1=$1 }
|
![]() |
| Hugseliste |
| Tags |
| regex, regeluttrykk |
| Thread Tools | Søk i denne tråden |
| Visningsmoduser | Ranger denne tråden |
|
|