Working on the embedded system design and implementation. Due to the "bad" code in the system, I need to use perl to scan all project code and replace the "bad" code. Perl is the great tool for this job, but the good perlish code is real hard to write!