Stuff

 else {
        	 print STDERR "----------------  defaulcase :";
            if( $in_pre ) {
                $this->{pretext} .= "$line\n";
            } else {
                $this->{posttext} .=  "$line\n";
            }
        }