in reply to REGEXP Help
For all but the first line, I think that you could try the substitution s/^.*\\//. BTW, comments by arunhorne hold for me, too.
--bronto
update: uhm... are the quotes part of the strings or not?
update 2: uhm... someone is trying to make me understand that the quotes are really there... That's ok.
how about this?
# first of all, adjust array subscripts, as suggested by arunhorne; # then set $header[0] ; # then... while (@header < 5) { $header = <LOG> ; $header =~ /^".*\\(.*)"$/ and push @header, $1 ; }
...and that should do the job.
|
|---|