Nach " suchen
Axel
- perl
Wie kann ich mit einem regulären Ausdruck nach Anführungszeichen (") suchen?
Wie kann ich mit einem regulären Ausdruck nach Anführungszeichen (") suchen?
if ($data =~ /"/) {
print "gefunden!\n"
}
else {
print "leider kein Treffer!\n"
}
Gruß
Reiner
if ($data =~ /"/) {
print "gefunden!\n";
}
else {
print "leider kein Treffer!\n";
}
Semikolon vergessen, sorry!
if ($data =~ /"/) {
print "gefunden!\n";
}
else {
print "leider kein Treffer!\n";
}Semikolon vergessen, sorry!
Problem liegt vielleicht noch woanders:
wenn ich Kommandozeilenargumente mit Anführungszeichen eingebe, findet er keine Anführungszeichen. Wenn ich mir die Argumente einfach ausgeben lasse, sind die Anführungszeichen auch weg. Wie kommt das?
if ($data =~ /"/) {
print "gefunden!\n";
}
else {
print "leider kein Treffer!\n";
}Semikolon vergessen, sorry!
Problem liegt vielleicht noch woanders:
wenn ich Kommandozeilenargumente mit Anführungszeichen eingebe, findet er keine Anführungszeichen. Wenn ich mir die Argumente einfach ausgeben lasse, sind die Anführungszeichen auch weg. Wie kommt das?
Kannst Du mal den Code posten?
if ($data =~ /"/) {
print "gefunden!\n";
}
else {
print "leider kein Treffer!\n";
}Semikolon vergessen, sorry!
Problem liegt vielleicht noch woanders:
wenn ich Kommandozeilenargumente mit Anführungszeichen eingebe, findet er keine Anführungszeichen. Wenn ich mir die Argumente einfach ausgeben lasse, sind die Anführungszeichen auch weg. Wie kommt das?Kannst Du mal den Code posten?
nicht wirklich:
ich versuche, ein Programm mit verschiedenen Parametern aufzurufen, die auch Anführungszeichen enthalten: Bsp.:
perl test.pl Apfel Birne "Süße Früchte"
Ich möchte also die Anführungszeichen als Begrenzer nutzen.
Dann geht es ungefähr so weiter:
$a = join(" ",@ARGV);
$a =~ /(".+")/;
$k = $1;
Das klappt nicht, weil er nichts findet, was von Anführungszeichen eingerahmt ist.
hi,
Das klappt nicht, weil er nichts findet, was von Anführungszeichen eingerahmt ist.
Hast Du MudGuard's post gelesen ?
Also dann teste mal, was in @ARGV ankommt mit dem folgenden 2 Zeiler
#!/perl
print join "\n", @ARGV;
Bei mir siehts so aus:
D:\scripts>perl argv.pl "wie was"
wie was
D:\scripts>
Ergo: Es liegt am Kommandozeileninterpreter (hinsichtlich perl wartet die command.com auch noch mit anderen Überrasschungen auf).
Gruss, Rolf
Hi,
wenn ich Kommandozeilenargumente mit Anführungszeichen eingebe, findet er keine Anführungszeichen. Wenn ich mir die Argumente einfach ausgeben lasse, sind die Anführungszeichen auch weg. Wie kommt das?
Das ist ein Feature Deines Kommandozeileninterpreters.
cu,
Andreas