Changeset 297 for obsdata/trunk

Timestamp:

11/15/06 22:24:57 (18 years ago)

Author:

nanardon

Message:

• fix: we should match $line, not $_ (my bad !)

File:

• obsdata/trunk/ourplugins/cr_radiosondage_tvd.pl (modified) (1 diff)

obsdata/trunk/ourplugins/cr_radiosondage_tvd.pl

@@ -96 +96 @@
     # just search line begining by 'a' ?
     while (my $line = <$handle>) {
-        /^a / or next;
+        $line =~ /^a / or next;
         chomp($line);
         my @val = split(/\s+/, $line);