Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

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

by manu_06 (Novice)
on Sep 17, 2010 at 00:45 UTC ( #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


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 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?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://860420]
and the fog begins to lift...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (6)
As of 2018-03-17 16:33 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (224 votes). Check out past polls.