I replaced it and got the same exception error on line 14634 which contains
the same &&.

Mmm, interesting ... Up until that point, $$ is used instead of &&.



-----Original Message-----
From: David Liouville [mailto:[EMAIL PROTECTED]
Sent: Thursday, November 06, 2003 12:56 PM
To: Gary Nielson; [EMAIL PROTECTED]
Subject: Re: Uncaught exception from user code with XML::Parser


try replace && with &&

----- Original Message -----
From: "Gary Nielson" <[EMAIL PROTECTED]>
To: "David Liouville" <[EMAIL PROTECTED]>;
<[EMAIL PROTECTED]>
Sent: Thursday, November 06, 2003 6:52 PM
Subject: RE: Uncaught exception from user code with XML::Parser


> Thanks. The line is:
>
> &&
>
> which is used throughout the file.
>
> Here are the lines that surround that line with the line noted with "->":
>
>       <cap:headline>
>       SHORT TERM FORECAST
>       </cap:headline>
>       <cap:description>
>
> SHORT TERM FORECAST...CORRECTED FOR FORMAT
> NATIONAL WEATHER SERVICE JACKSON KY
> 951 AM EST THU NOV 6 2003
>
> KYZ044-050>052-058>060-104-106-108-111-061645-
> BATH-ELLIOTT-ESTILL-FLEMING-LEE-MENIFEE-MONTGOMERY-MORGAN-POWELL-
> ROWAN-WOLFE-
> INCLUDING THE CITIES OF...WEST LIBERTY...STANTON...SANDY HOOK...
> OWINGSVILLE...MOUNT STERLING...MOREHEAD...IRVINE...FRENCHBURG...
> FLEMINGSBURG...CAMPTON AND BEATTYVILLE
> 951 AM EST THU NOV 6 2003
>
> .NOW...
> SCATTERED LIGHT SHOWERS WILL REMAIN ACROSS THE AREA THIS
> MORNING...WITH RAINFALL AMOUNTS FROM 930 AM TO NOON OF LESS THAN A
> COUPLE TENTHS OF AN INCH.  THE SHOWERS WILL BECOME MORE WIDESPREAD
> THIS AFTERNOON.
>
> THE FOG WILL CONTINUE TO LIFT THIS MORNING...BUT THERE WILL BE SPOTS
> WHERE VISIBILITIES ARE REDUCED TO ONE HALF OF A MILE UNTIL NOON.
> -> &&
> BE ON THE LOOKOUT FOR SUDDEN CHANGES IN VISIBILITY. THE PATCHY NATURE
> OF THE FOG WILL DROP VISIBILITIES QUICKLY IN A SHORT DISTANCE.
> $$
> OUDEMAN
>
>
>
>
>
>
>       </cap:description>
>       <cap:web>
>       http://www.nws.noaa.gov/alerts/us.html#KYZ044.JKLNOWJKL.145500
>       </cap:web>
>
> -----Original Message-----
> From: David Liouville [mailto:[EMAIL PROTECTED]
> Sent: Thursday, November 06, 2003 12:41 PM
> To: Gary Nielson; [EMAIL PROTECTED]
> Subject: Re: Uncaught exception from user code with XML::Parser
>
>
> It's probably an XML error ...
> could you send the line 14580 of us.xml ?
>
>
> ----- Original Message -----
> From: "Gary Nielson" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Thursday, November 06, 2003 6:20 PM
> Subject: Uncaught exception from user code with XML::Parser
>
>
> > I am learning to use XML::Parser. I am trying to pass a US Weather
Service
> > xml file. I can successfully parse it until it dies on me with the
> following
> > error:
> >
> > C:\TEMP\xml>perl weather.pl
> > Uncaught exception from user code:
> >
> > not well-formed (invalid token) at line 14580, column 1, byte 477680 at
> > C:/Perl
> > site/lib/XML/Parser.pm line 185
> >         XML::Parser::parsefile('XML::Parser=HASH(0x182f0d4)','us.xml')
> > called a
> >  weather.pl line 24
> >
> > C:\TEMP\xml>perl -c weather.pl
> > weather.pl syntax OK
> >
> > Any help appreciated. This is probably too much infomration but the
script
> > is as follows:
> >
> > use strict;
> > use XML::Parser;
> > use diagnostics;
> > use vars qw(@array $xmlfile $count $tag $element);
> >
> >
> > my $xmlfile = "us.xml";
> > die "Cannot find file \"$xmlfile\""
> >        unless -f $xmlfile;
> >
> >
> > $count = 0;
> > $tag = "";
> >
> >
> >
> > my $parser = new XML::Parser;
> >
> > $parser->setHandlers( Start => \&startElement,
> >                            End => \&endElement,
> >                            Char => \&characterData,
> >                            Default => \&default);
> >
> > $parser->parsefile($xmlfile);
> >
> > sub startElement {
> >        my( $parseinst, $element, %attrs ) = @_;
> > #print "start element: $element\n";
> >         }
> >
> > sub endElement {
> >        my( $parseinst, $element ) = @_;
> >   #print "end element: $element\n";
> >
> >       }
> >
> > sub characterData {
> >        my( $parseinst, $data ) = @_;
> > $data =~ s/\n|\t//g;
> > push @array, $data;
> > # print "$data\n";
> >  }
> >
> > sub default {
> >        my( $parseinst, $data ) = @_;
> > }
> >
> > The file I am parsing is at http://www.nws.noaa.gov/alerts/us.cap.
> >
> >
> > _______________________________________________
> > Perl-Win32-Users mailing list
> > [EMAIL PROTECTED]
> > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
>
> ---
> Outgoing mail is certified Virus Free.
> Checked by AVG anti-virus system (http://www.grisoft.com).
> Version: 6.0.536 / Virus Database: 331 - Release Date: 05/11/2003
>
>


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.536 / Virus Database: 331 - Release Date: 05/11/2003



_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to