$rePOD->Select(999999,999999); $rePOD->SetCharFormat( -color => 0x000000, -bold => 1, @aFont -height => $self->rhConfig()->{podFontSize}, -name => $self->rhConfig()->{podFontName}, ); $rePOD->ReplaceSel("$line\n", 1);