![]() |
Hallo und herzlich Willkommen aus den Vereinigten Staaten, die UNIX-und Linux-Foren! Vielen Dank für Ihren Besuch und die Teilnahme an unserem Global Community.
|
|
Google unix.com
|
|||||||
| Foren | Registrieren | Forum-Regeln | Links | Alben | FAQ | Benutzerliste | Kalender | Suche | Die heutige Beiträge | Alle Foren als gelesen markieren |
| Shell Programmierung und Scripting Post Fragen zu ksh, csh, sh, bash, Perl, PHP, sed, awk und anderen Shell-Skripte und Shell-Scripting-Sprachen hier. |
Mehr UNIX-und Linux-Forum Themen Vielleicht finden Sie hilfreiche
|
||||
| Faden | Thread Starter | Forum | Antworten | Last Post |
| Ablegen von Befehlen in der $-Variablen. | Paulw0t | Shell Programmierung und Scripting | 7 | 08-08-2008 05:42 PM |
| Speicherung von Variablen in array.Please Hilfe | nua7 | Shell Programmierung und Scripting | 7 | 07-17-2008 09:47 AM |
| Die Aufteilung der Daten und die Speicherung in 2 Variablen | jisha | Shell Programmierung und Scripting | 10 | 02-17-2008 10:40 PM |
| Ablegen Pointer Array in C | arunkumar_mca | UNIX for Dummies Questions & Answers | 1 | 08-23-2007 08:49 AM |
| awk - Speicherung von Daten in Variablen | 2nilotpal | Shell Programmierung und Scripting | 7 | 04-16-2004 05:32 AM |
![]() |
|
|
LinkBack | Thread Tools | Suche diesen Thread | Rate Thread | Anzeige-Modi |
|
|
|
||||
|
perl: Speichern regex Array Variablen in Schwierigkeiten
Hi
Dies ist ein Beispiel der Code: Code:
use strict;
use warnings;
open FILE, "/tmp/result_2";
my $regex="\\[INFO\\] Starting program ver. (.*)";
my $res="Program started, version <$1> - OK.\n";
while (<FILE>) {
if ($_ =~ /($regex)/) {
print "$res";
}
}
close FILE;
![]() |
|
||||
|
Mit einem String in doppelten Anführungszeichen, die $ 1 wird durch Interpolation auf die Zeit, die Sie definieren die Zeichenfolge. Probieren Sie einfache Anführungszeichen und eval print $ res;
|
|
||||
|
in dieser Redaktion:
Code:
use strict;
use warnings;
open FILE, "/tmp/result_2";
my $regex="\\[INFO\\] Starting program ver. (.*)";
my $res='Program started, version <$1> - OK.\n';
while (<FILE>) {
if ($_ =~ /$regex/) {
eval print $res;
}
}
close FILE;
![]() |
![]() |
| Lesezeichen |
| Tags |
| perl regex |
| Thread Tools | Suche diesen Thread |
| Anzeige-Modi | Rate this thread |
|
|