Update:Okay, I have to ask it...how in the hell did you go 10 years coding in Perl without learning regexes?

Wild guess: much fiddling with index and substr, and occasionally pack and unpack?
;-)