fsm_perl - A Script to Generate RTL Code for State Machines and Synopsys Synthesis Scripts(Clifford E. Cummings)