[Pikes-peak-pm] Perl Program

[Tim Chambers]

Hi, Rod,

Here's one way to do what you asked.

perl -pe 's/^([^;]+[^I])([CDI]|II);/\1 \2;/' < infile > outfile

<>< Tim