mehrere Wertepaare aus einem String auslesen: String zerlegen - #78499 (Allgemeines zu Perl)

Joseba

2007-07-15 21:02

User since
2007-07-14
9 Artikel
BenutzerIn
[default_avatar]

[quote=pq,15.07.2007, 03:51]wieso nicht? du kannst CGI::new auch einen string übergeben.

Code: (dl )

my $cgi = CGI->new($string_from_java);

[/quote]
Okay, habe es mal probiert. Das mit dem String funktioniert zwar so, allerdings behebt es nicht so ganz mein Bedenken, dass richtig getrennt wird, falls z.b. ein Wert auch so ein "Trennzeichen" enthällt.

So funktioniert das ganze:

Code: (dl )

my $java_string = "var1=wert1;var2=wert2;var3=wert3";
my $cgi = CGI->new($java_string);
my %hash = $cgi->Vars;

foreach my $key (keys %hash){
  print "$key -> $hash{$key}\n";
}

Ausgabe:
var3 -> wert3
var1 -> wert1
var2 -> wert2

--

Falls der String aber z.B. so aussieht, dann geht es nicht mehr:

Code: (dl )

my $java_string = "var1=wert=;1;var2=wert2;var3=wert3";

Ausgabe:
var3 -> wert3
1 ->
var1 -> wert=
var2 -> wert2