diff --git a/perl/render.pl b/perl/render.pl
index c72147f..0becbd3 100755
--- a/perl/render.pl
+++ b/perl/render.pl
@@ -14,3 +14,4 @@ $lasic->reset();
 
 my $pbm = Brm::Lasic::PBM->new(lasic => $lasic, file => $ARGV[0]);
 $pbm->render();
+$lasic->move(0, 0);