Hi Rob,
Thanks for you logic. I will explain what I am doing and what I
expect.
I have written a code to hit a particular URL from my code and
the code will return the rawdata. Now the rawdata itself is an XML file
and I want to optn the XML file in internet explorer.
The script which I am using is:
require LWP::UserAgent;
my $ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->env_proxy;
open (FH,">d:\\print.xml");
my $response =
$ua->get('http://seraja.com/EventManager.do?func=getEventDetails&session
ID=FA8169578A1FACFBCEBDC6DD5850C1A5&eventID=70280');
if ($response->is_success)
{
my $raw_data = $response->content; # or whatever
$/ = undef;
# my $raw_data = $content;
$raw_data =~ s/&/&/g;
$raw_data =~ s/\s+/ /g;
print FH $raw_data;
}
else {
die $response->status_line;
}
When I execute the above code it creates an xml file in the given
location and we need to manually open the file to view. I want to view
the xml file in IE immediately after executing the code.
I am using Windows system.
Plese help me solving this issue, it's very urgent.
Thanks & Regards,
Suja Emmanuel.
-----Original Message-----
From: Rob Dixon [mailto:[EMAIL PROTECTED]
Sent: Thursday, July 13, 2006 9:29 PM
To: beginners@perl.org
Subject: Re: How to write output in an xml file
Suja Emmanuel wrote:
>
> Dear all,
>
> I don't know how to write output in an xml file and open
in
> IE browser. If anyone could write the sample program for that it will
be
> very much helpful for me.
Hi Suja.
You'll have to tell us more about what you want. If you're on a Windows
system
this will write XML and show it in Internet Explorer:
use strict;
use warnings;
open my $fh, '> xml.xml' or die $!;
print $fh <<XML;
<?xml version="1.0"?>
<subject>
Using Perl to write output in an XML file
</subject>
XML
close $fh;
system 'xml.xml';
but isn't very comprehensive. Do you have raw data that you want to put
into
XML? Or data in XML that you want to put into HTML? Do you need to use
XSLT?
Describe the problem and we will help.
Rob
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
The information contained in, or attached to, this e-mail, contains
confidential information and is intended solely for the use of the individual
or entity to whom they are addressed and is subject to legal privilege. If you
have received this e-mail in error you should notify the sender immediately by
reply e-mail, delete the message from your system and notify your system
manager. Please do not copy it for any purpose, or disclose its contents to any
other person. The views or opinions presented in this e-mail are solely those
of the author and do not necessarily represent those of the company. The
recipient should check this e-mail and any attachments for the presence of
viruses. The company accepts no liability for any damage caused, directly or
indirectly, by any virus transmitted in this email.
www.aztecsoft.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
