diff --git a/plug-ins/perl/TODO b/plug-ins/perl/TODO
index c6a2d83017..8fb173a624 100644
--- a/plug-ins/perl/TODO
+++ b/plug-ins/perl/TODO
@@ -33,24 +33,24 @@ olof
 
 bugs
 
-  * rate-limiting for gimp_message BEFORE 1.2
+  * update logulator
+  * update frosty-logo.scm  t-o-p-logo.scm starscape-logo.scm starburst-logo.scm
+[DONE]  * rate-limiting for gimp_message BEFORE 1.2
   * on-query => remove gimp::fu parasite(?)
   * bricks requires disable for pattern(?)
   * better default argument-handlign via a "massage_args" callback from Gimp/UI/interact?
-  * update frosty-logo.scm  t-o-p-logo.scm starscape-logo.scm starburst-logo.scm
   * installation & Feature system (?)
   * map_to_gradient does not work on GRAYA thingies. Argh.
-[DONE]  * /root/gimprelease && TODO -> publish! PUSH PUSH
   * perl_require_pv with _59?
   * scroll behaviour, use clist instead of list?
   * document Gimp::PDL and rect2, ...2 functions!
-  * podestions are not expanded in dialog help strings etc..
+  * document Gimp:PDL!!!
   * Kommandozeilenmodus(!).
-  * don't start gimp in cmdline mode and error.
+[KILL]  * don't start gimp in cmdline mode and error.
   * KILL :auto from default(!)
   * auto-flush of gdrawable when merge_shadow(?)
   * gimp-piddle must be written back automatically on destroy, if changed
-  * possibly rename "Brush Selection" to "Paint Settings"
+[KILL]  * possibly rename "Brush Selection" to "Paint Settings"
   * gimp-tile set dirty automatically(!)
   * perl module install dependency
   * $Config{cc} might not understand Gimps CFLAGS (-mpentium).
@@ -61,11 +61,10 @@ bugs
 important issues
 
   * constant names (RADIO) automatically into help strings!
-  * gimpdoc with caching & [DONE]exampling ;--->
+[KILL]  * gimpdoc with caching & [DONE]exampling ;--->
   * migrate BOOT: into INIT() (forgot why but important for B)
   * gimp_progress_done, gimp_progress_close
   * maybe implement --enable-perl=runtime-only?
-  * pdb_proc_renameto
   * gimp_default_display (...) for libgimp
   * Gimp::Module for modules (!)
   * PerlCC configurable options for Perl-Server startup, Gipm_host etc.
@@ -75,7 +74,7 @@ important issues
   * change set_usize to something else..
   * Gimp::IO (?)
   * install scripts in share/
-  * register dummy function to calm gimp down (really??)
+[KILL]  * register dummy function to calm gimp down (really??)
   * gimp->object_id, drawable_object_id remove!
   * vamp up homepage
   * Gimp::ping
diff --git a/plug-ins/perl/examples/colorhtml b/plug-ins/perl/examples/colorhtml
index cc5a24e3cd..fb8dc4abeb 100755
--- a/plug-ins/perl/examples/colorhtml
+++ b/plug-ins/perl/examples/colorhtml
@@ -40,7 +40,6 @@ register "file_colorhtml_save",
          ],
          sub {
    my($img,$drawable,$filename,$filename2,$source,$text,$size,$html40,$closetag) = @_;
-   print " @_\n";
    my($new_img,$new_drawable);
    my $max;
    my $export = Gimp::UI::export_image ($new_img=$img, $new_drawable=$drawable, "COLORHTML",
diff --git a/plug-ins/perl/examples/dataurl b/plug-ins/perl/examples/dataurl
index c412da3f91..2cf8213f89 100755
--- a/plug-ins/perl/examples/dataurl
+++ b/plug-ins/perl/examples/dataurl
@@ -7,10 +7,7 @@ use Gimp::Fu;
 use Gimp::UI;
 use Fcntl;
 
-# Gimp::set_trace(TRACE_ALL);
-
-sub encode_base64 ($;$)
-{
+sub encode_base64($) {
     my $res = substr pack ("u", $_[0]), 1;
     $res =~ s/\n.//mg;
     $res =~ tr|` -_|AA-Za-z0-9+/|; #` # syntax-hiliting in emacs kanns nicht