update changes from Verilog-Perl