Off by one.

gisle · Jan 2, 2003 · 9862b48 · 9862b48
1 parent cee33d9
commit 9862b48
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/encode-base64 b/encode-base64
@@ -5,7 +5,7 @@ use MIME::Base64 qw(encode_base64);
 my $buf = "";
 while (<>) {
     $buf .= $_;
-    if (length($buf) > 57) {
+    if (length($buf) >= 57) {
 	print encode_base64(substr($buf, 0, int(length($buf) / 57) * 57, ""));
     }
 }