Thanks Peter with a little tinkering I was breezing along
Thanks to All
logger
-Original Message-
From: Peter Eisengrein
To: 'logger'; [EMAIL PROTECTED]
Sent: 9/3/02 11:33 PM
Subject: RE: [Perl-unix-users] need some help in pattern
matching
### UNTESTED
my $line =
logger wrote:
> SOrry actually my framing of the question was wrong
> my actual query was
> How to match this pattern
>
> \x00020bb8a9f3702f
>
> I think is it
>
> and then break it into
>
> into
> v6=3000 // dec of 0bb8
> v7=169.43.112.47 // (a9f3702f converted to decimal )
>
logger wrote:
> Hi All
> I have an entry like this in a file which I want to parse
> #comments1
> DNFAR1S query tli tcp /dev/tcp \x00020bb8a9f3702f
> #comments2
> PKG1S query tli tcp /dev/tcp \x000205c8a9f3702f
> and put into another file as different variables like
Title: RE: [Perl-unix-users] need some help in pattern matching
### UNTESTED
my $line = 'DNFAR1S query tli tcp /dev/tcp \x00020bb8a9f3702f';
my @chunks = split(/\ /,$line);
# get the first 5 vars from @chunks
my ($v5,$h6,$ip1,$ip2,$ip3,$ip4) = $line =~ /^.(\
