Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re^2: Reading/Parsing an XML file using Perl

by manu_06 (Novice)
on Sep 17, 2010 at 00:45 UTC ( [id://860420]=note: print w/replies, xml ) Need Help??


in reply to Re: Reading/Parsing an XML file using Perl
in thread Reading/Parsing an XML file using Perl

Hi,

Thank you for the help. I was trying your suggestion but it is showing up syntax error near the end of the script "}"

#!/usr/local/bin/perl-w use strict; use warnings; use XML::Simple; my $path = 'C:\Documents and Settings\user\Desktop\output2\FITS\ IMD02 +5350802'; # add your path here for my $xfile (glob "$path/*.xml") { print "xfile=$xfile\n"; my $xml = XML::Simple->new(); my $file = $xml->XMLin($xfile) or die $!; if (($file->{identification}{'identity'}{'format'} eq 'JPEG File I +nterchange Format') && ($file->{filestatus}{'well-formed'}{'content'} eq 'true') && ($file->{ +filestatus}{'valid'}{'content'} eq 'true')) }

Error: syntax error at one.pl line 14, near ") }"

Replies are listed 'Best First'.
Re^3: Reading/Parsing an XML file using Perl
by rowdog (Curate) on Sep 18, 2010 at 09:11 UTC

    You're missing at least an opening brace. You have

    ($file->{filestatus}{'well-formed'}{'content'} eq 'true') && ($file->{ +filestatus}{'valid'}{'content'} eq 'true')) }

    but you need something like

    ($file->{filestatus}{'well-formed'}{'content'} eq 'true') && ($file->{ +filestatus}{'valid'}{'content'} eq 'true')) { # do something useful }

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://860420]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others about the Monastery: (6)
As of 2024-03-29 00:37 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found