Solved

Search and Compare between 2 Files and writing the results into another file.

Posted on 2008-10-02
1
280 Views
Last Modified: 2013-11-17
Hello,

I have 2 files. Both of these files have XML formats.

First File has Single Line XML Requests and second file has single line XML OutPuts.

Every Request Line has an ID associated to it and the corresponding response will have the same ID in it.

Now the problem is to separate those request lines from the Request File which has no corresponding success response in the Response File.

There fields in the XML which have ID And Status Information in the same line.  

<Id>123</ID> ...... <Status>Success</Status>

what this means is, For every Line in Request File, There will be a ID Filed, whose value will uniquely identify that request. This Id needs to be searched in the Response File, If I find that ID, in the same Line I should Find the <Status>Success</Status>.

If I do not find the Id at all in the Response File or After finding the Id, the <Status>Success</Status> is not found in the same line, then the Corresponding Line from the REQUEST FILE need to be copied into a FailedRequestsFile.

So I hope the description I gave explains that this is all about filtering the requests which failed to retuning a response at all or returned a Fail response. so that we can reprocess them.

thank you.
0
Comment
Question by:objectkk
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
1 Comment
 
LVL 39

Accepted Solution

by:
Adam314 earned 500 total points
ID: 22626364
It would help if you posted both XML files... but going on your description so far

open(my $in, "<response_file_here.txt") or die "Could not open response: $!\n";
my %Res;
while(<$in>) {
	next unless m|<id>(\d+).*<Status>(.*?)</Status>|;
	$Res{$1} = $2;
}
close($in);
 
 
open($in, "<request_file_here.txt") or die "Could not open requests: $!\n";
open(my $out, ">failed_requests.txt") or die "Could not open failed requests: $!\n";
while(<$in>) {
	next unless /<id>(\d+)/;
	print $out $_ unless($Res{$1} and $Res{$1} eq 'Success');
}
close($out);
close($in);

Open in new window

0

Featured Post

[Webinar] Learn How Hackers Steal Your Credentials

Do You Know How Hackers Steal Your Credentials? Join us and Skyport Systems to learn how hackers steal your credentials and why Active Directory must be secure to stop them. Thursday, July 13, 2017 10:00 A.M. PDT

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Installing FreeBSD… FreeBSD is a darling of an operating system. The stability and usability make it a clear choice for servers and desktops (for the cunning). Savvy?  The Ports collection makes available every popular FOSS application and packag…
A year or so back I was asked to have a play with MongoDB; within half an hour I had downloaded (http://www.mongodb.org/downloads),  installed and started the daemon, and had a console window open. After an hour or two of playing at the command …
Learn how to get help with Linux/Unix bash shell commands. Use help to read help documents for built in bash shell commands.: Use man to interface with the online reference manuals for shell commands.: Use man to search man pages for unknown command…
This video shows how to set up a shell script to accept a positional parameter when called, pass that to a SQL script, accept the output from the statement back and then manipulate it in the Shell.

628 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question