sub manual_gerber_auto { $W->destroy; system "perl $GENESIS_DIR/sys/edesign/scripts/input_manual.pl"; exit; }