strings finden und ausgeben

[C167]

Tagchen,
ich hab hier ein paar Dateien, die Strings nach dem folgenden Muster enthalten:

Code: Alles auswählen

{L_irgendwelche_zeichen}

mir geht es jetzt darum, diese Zeichen in eine Datei zu ballern oder zuallererst mal auszugeben. Es sind nur normale Zeichen und Zahlen drin, also [a-zA-Z0-9_]
Hintergrund: Ich brauche eine Beispieldatei fuer das Uebersetzungssystem vom phpbb3. Dort sind alle Texte naemlich wie oben gezeigt angegeben, die scripte ziehen das raus, entfernen das L_ und schauen dann in arrays nach. Ich moechte so was aenliches jetzt mit C++/Qt schreiben.
Die Datei dafuer sieht dann z.b. so aus:

Code: Alles auswählen

QT_TRANSLATE_NOOP("dateiname.html", "irgenwelchezeichen");

wobei es ncihts macht, wenn das L_ vorne dran ist.

Also, momentan stecke ich bei sed fest, weil ich den syntax nicht ganz kapiere. Wenn ich den Befehl hab um die liste anzuzeigen, kann ich die liste per bash-script mit dem QT_TRANSLATE_NOOP... verheiraten.
Bis jetzt hab ich versucht den sed-befehl von hier zu verwenden, aber das ist meine erste Beruehrung mit sed
Hab mir auch schon ueberlegt das ganze mit perl zu versuchen, aber wegen ein paar beispieldateien ein perl-script zu schreiben?
C167

[uname]

Hab mir auch schon ueberlegt das ganze mit perl zu versuchen, aber wegen ein paar beispieldateien ein perl-script zu schreiben?

Ich für meinen Fall schreibe meistens für sowas auch Perl-Scripte, obwohl es meist auch mit einem sed-Einzeiler geht. Das liegt daran, dass ich sowohl "sed" nicht wirklich verstehe und vor allem daran, dass ich gerne Perl-Hashes für alle möglichen Dinge nutze.

[C167]

naja mit perl fang ich halt auch erst mehr oder weniger an makefiles anhand von Doxygen-tags schreiben bekomm ich nach einigem hin- und her auch hin
Bin inzwischen bei folgender Zeile angelangt:

Code: Alles auswählen

sed -ne 's/^.*\({L_[A-Za-z0-9_]}\);.*$/\1/p' file.html

aber das gibt nix aus, ich denke wegen der "{" und "}"

€dit: inzwischen hab ich rausgefunden wie das phpbb3 das macht (file: includes/functions_template.php:256)

Code: Alles auswählen

$text_blocks = preg_replace('#\{L_(a-z0-9\-_]*)\}#is', .......

[Spasswolf]

Schon strings probiert?

[C167]

ich hab hier keine binaerdaten, sondern normale textdateien. sonst wuerde ich ja nicht mit sed und perl versuchen and Ziel zu kommen

[Sid Burn]

Eine kleine Beispieldatei wäre nicht schlecht. Ansonsten schreibst du nirgends ob ein vollständiger Tag auch immer in einer Zeile vorkommt. Oder kann dieser auch auf mehreren Zeilen aufgeteilt sein? Ist jede Zeile ein einzeilner Tag? u.s.w.

Ein kleines Beispiel das davon ausgeht das ein solches schnipsel immer komplett auf einer Zeile vorkommt und auch mehrerer Solcher sachen auf einer Zeile vorkommen können:

Code: Alles auswählen

#!/usr/bin/perl
# Core Module
use strict;
use warnings;
use utf8;
use open ':utf8';
use open ':std';
use Carp qw(carp croak);
use Fatal qw(open close);
use IO::Handle;
use English '-no-match-vars';
# CPAN Module
#use Smart::Comments;

while ( my $line = <DATA> ) {
    print join("\n", $line =~ m/ \{ L_ (\w+?) \} /xmsg), "\n";
}

__DATA__
{L_irgendwelche_zeichen} {L_lkjsafdnlkjn}
{L_hallo234welt_sadf}

Das ganze gibt dir nur alles hinter "L_" jeweils auf einer Zeile aus.