http://www.perlmonks.org?node_id=939172


in reply to Re: Problem with PPI HereDoc's
in thread Problem with PPI HereDoc's

Hi, Khen1950fx,

Thank you for replying.

I think

push @NewHereDoc_a,PPI::Document->new(\( $HereDoc_o->content() ."\n" ."/* $Comment_S\n" # Comment .join('',$HereDoc_o->heredoc()) # ... origina +l commented out ."*/\n" # .$NewText_s # ... replace +ment ."\n" .$HereDoc_o->terminator() ));

should create a new PPI::Document object for each of the HereDocs that I want to update.