Perl: Verständnisfrage

juedan

FreeBSDler
Hallo Forum,

im Moment bastle ich einen Parser, der METAR-Daten (Wetterdaten) in eine lesbare Form bringt. Dabei bin ich auf felgendes Problem gestoßen:
Code:
my $pat_wind = "^(VRB|\d{3})\d{2}(G|KMH|MPH|KT)";
sub metar_parser {
  my $m = "VRB11G29KT";

  if ($m =~ m/$pat_wind/ && length($m) > 4) {
    print "m = ", $m, "\n";
}
bleibt ohne Ausgabe.
Code:
sub metar_parser {
  my $m = "VRB11G29KT";

  if ($m =~ m/^(VRB|\d{3})\d{2}(G|KMH|MPH|KT)/ && length($m) > 4) {
    print "m = ", $m, "\n";
}
Schreibt
Code:
m = VRB11G29KT
Worin liegt der Unterschied zwischen beiden Abfragen?

Danke für die Antworten.

JueDan
 
Meine Antwort auf meine Frage:D

Es muß
Code:
my $pat_wind = "^(VRB|[COLOR="Red"]\[/COLOR]\d{3})[COLOR="Red"]\[/COLOR]\d{2}(G|KMH|MPH|KT)";
heißen.
Tschuldigung für die Störung:D

JueDan
 
Back
Top