I have had my log parsing routines crash because of invalid ASCII characters, so I run this code against it, which cleans up the bad boys found.

# loop through the file zapping the bad characters found
    while(<FILE>)
    {
        $lineBuff = $_;

        # remove upper ascii
        $lineBuff =~ s/([\x7F-\xFF]+)/$delimiter/gm;

        # remove lower ascii
        $lineBuff =~ s/([\x00-\x1F]+)/$delimiter/gm;
        $lineBuff =~ s/\%//gm;

        # send the clean data to the output file
        print OUT "$lineBuff\n";

    }
[download]

Richard

There are three types of people in this world, those that can count and those that cannot. Anon