First thing I'd do is stick a test in to check for any unexpected data. Write a regex that should match the data you _do_ expect, and log anything that doesn't match, together with the name of the file it comes from...
while(<ASUBFILE>){ unless (/^[A-Za-z0-9 other expected chars]*$/) { print LOG "Encountered unexpected data for $strTName: $_\n"; } $strASub .= $_; }
$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}} split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/
In reply to Re: Strange crash - any ideas?
by jonadab
in thread Strange crash - any ideas?
by AssFace
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |