It works with net!
In the doc of Verilog::Netlist::Port there is a description of the accessor "comment":
$self->comment
Returns any comments following the definition. keep_comments=>1 must be passed to Verilog::Netlist::new for comments to be retained
Thanks again toolic!