diff --git a/cpu/mc1322x/tools/rftestrx2pcap.pl b/cpu/mc1322x/tools/rftestrx2pcap.pl index 2bf58a657..b10c19d09 100755 --- a/cpu/mc1322x/tools/rftestrx2pcap.pl +++ b/cpu/mc1322x/tools/rftestrx2pcap.pl @@ -59,13 +59,13 @@ while(1) { #new packet ($sec, $usec) = gettimeofday; print STDERR "rftestline: $sec $usec $str"; - } elsif($str =~ /^\s*data/) { + } elsif($str =~ /^\w+/) { #packet payload print STDERR "dataline: "; print STDERR $str; - $str =~ /data: 0x\d+ (.+)/; + chomp $str; + $str =~ /(.+)/; my @data = split(' ',$1); - ($len, @data) = @data; #write out pcap entry print pack('LLLL',($sec,$usec,scalar(@data),scalar(@data)+2)); print STDERR "new packet: $sec $usec " . scalar(@data) . " " . (scalar(@data)+2) . "\n\r";