diff --git a/plug-ins/perl/MANIFEST b/plug-ins/perl/MANIFEST
index 3bd1a63d1c..bd66cb6e76 100644
--- a/plug-ins/perl/MANIFEST
+++ b/plug-ins/perl/MANIFEST
@@ -121,6 +121,7 @@ examples/layerfuncs
 examples/bricks
 examples/dataurl
 examples/colorhtml
+examples/gap-vcr
 pxgettext
 po/ChangeLog
 po/gimp-perl.pot
diff --git a/plug-ins/perl/Makefile.PL b/plug-ins/perl/Makefile.PL
index f0045d0733..eee55fbe77 100644
--- a/plug-ins/perl/Makefile.PL
+++ b/plug-ins/perl/Makefile.PL
@@ -35,7 +35,7 @@ if ($ARGV[0] ne "--writemakefile") {
       repdup centerguide stampify goldenmean triangle mirrorsplit
       layerfuncs randomart1 glowing_steel frame_reshuffle frame_filter
       logulator miff gimpmagick guide_remove guides_to_selection burst
-      fire povray avi layerfuncs bricks dataurl colorhtml
+      fire povray avi layerfuncs bricks dataurl colorhtml gap-vcr
    );
 @pdl_pins =
    qw(
diff --git a/plug-ins/perl/examples/gap-vcr b/plug-ins/perl/examples/gap-vcr
index df99ce8562..f055f75c90 100755
--- a/plug-ins/perl/examples/gap-vcr
+++ b/plug-ins/perl/examples/gap-vcr
@@ -23,7 +23,7 @@ sub create_main {
    $w->add ($h);
 
    $h->add(Gtk::Object::new Gtk::Button 
-           label => '<<',
+           label => '|<<',
            signal::clicked => sub {
               drawable->gap_first;
            });
@@ -38,7 +38,7 @@ sub create_main {
               drawable->gap_next;
            });
    $h->add(Gtk::Object::new Gtk::Button 
-           label => '>>',
+           label => '>>|',
            signal::clicked => sub {
               drawable->gap_last;
            });
diff --git a/plug-ins/perl/examples/parasite-editor b/plug-ins/perl/examples/parasite-editor
index bae92c9cb6..5a8f1737ba 100755
--- a/plug-ins/perl/examples/parasite-editor
+++ b/plug-ins/perl/examples/parasite-editor
@@ -139,8 +139,6 @@ sub create_main {
    my $b;
    my $t;
 
-   parse Gtk::Rc Gimp->gtkrc;
-
    $t = new Gtk::Tooltips;
    my $w = new Gtk::Dialog;