note
Fletch
<p>
And since you have the byte offset in the file you can explicitly print the offending portion of the input with some context thusly:
</p>
<code>
perl -le 'open(X,shift())or die "$!";seek(X, 12000, 0)or die "$!";read X, $b, 40;print $b, "\n", " " x 19, "^\n"' foo.xml
</code>
<p>
<b>Update:</b> Oop, I see by the paths mentioned you're on Wintendo; you'll probably want to adjust the quotes on that or store it into a file and run that (or just get a real shell and/or OS . . . :)
</p>
<div class="pmsig"><div class="pmsig-58196">
<p>-- <br />
We're looking for people in <a href="http://jobs.perl.org/job/2478">ATL</a></p>
</div></div>
471291
471295