![]() |
|
|
google unix.com
|
|||||||
| Fóruns | Registar | Fórum Regimento | Ligações | Álbuns | FAQ | Lista deputados | Calendário | Pesquisa | Today's Posts | Mark Forums Read |
| Programação Shell Script e Post perguntas sobre ksh, CSH, SH, BASH, Perl, PHP, SED, Awk e outros scripts shell e shell scripts línguas aqui. |
Mais UNIX e Linux Fórum Tópicos Você pode achar Helpfull
|
||||
| Fio | Thread Starter | Fórum | Respostas | Última postagem |
| Expressões Regulares HELP - PERL | maxmave | UNIX para Dummies Perguntas & Respostas | 1 | 06-04-2008 01:15 |
| expressões regulares | jack1981 | Programação Shell Script e | 4 | 07-12-2006 04:10 |
| Expressões Regulares | sandeep_hi | Programação Shell Script e | 6 | 06-12-2006 03:12 |
| Perl expressões regulares ... | DrRo183 | Programação Shell Script e | 1 | 04-26-2006 10:28 |
| As expressões regulares em sed | mfreemantle | UNIX para Dummies Perguntas & Respostas | 3 | 02-11-2002 09:34 |
![]() |
|
|
Linkback | Thread Tools | Pesquisar este Thread | Rate Thread | Display Modes |
|
|
|
||||
|
Expressões Regulares HELP - PERL
Olá,
Código:
$line=USING (FILE '/TEST1/FILENAME'5000) Eu testei as seguintes expressões ... Tipo 1: $ var1 \u003d `sed -e 's / .* \' / / '-e' s \ ).*$/' $ linha »; Tipo 2: $ var1 \u003d `echo $ linha | awk-F" \ ' "' (print $ 2) '| awk-F" \ \) "' (print $ 1) '`; Tipo 3: $ var1 \u003d `echo $ linha | sed 's / .* \' / / '| sed 's / \ ).*$//'`; Tipo 4: $ var1 \u003d `echo $ linha | sed 's / .* \' / / '| sed 's / \ )$//'`; Tipo 5: $ var1 \u003d `echo $ linha | sed 's / .* Arquivo / /' | sed 's / Encerramento .*$//'`; Tipo 6: $ var1 \u003d `echo $ linha | sed 's / "/ / g' | sed 's / \) / / g' | awk-F "\ '"' (print $ 2) ' `; Tipo 7: $ var1 \u003d `sed 's / .*' \ (.* \ )).*/ \ 1 / '$ linha »; mas nada está a trabalhar fora, estou sempre recebendo um erro dizendo que Código:
sh: -c: line 0: syntax error near unexpected token `('
Obrigado Rahul Última edição por Yogesh Sawant; em 06/05/2008 04:56.. Motivo: adicionado código tags |
|
||||
|
Ou, finalmente, com Perl:
Código:
if ($line =~ m/'(\d+)\)/) { $Var1=$1 }
|
![]() |
| Marcadores |
| Tags |
| regex, expressões regulares |
| Thread Tools | Pesquisar este Thread |
| Display Modes | Esta taxa Thread |
|
|