From: chromatic <chromatic@wgz.org>
Date: Mon, 27 Jul 2009 12:44:15 +0000 (+0200)
Subject: syswrite prints garbage if called with empty scalar and non-zero offset
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6100a0a495d0f5504fc134f242a1ebed97a87087;p=p5sagit%2Fp5-mst-13.2.git

syswrite prints garbage if called with empty scalar and non-zero offset
---

diff --git a/pp_sys.c b/pp_sys.c
index 23f79ba..ec12cd4 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1919,7 +1919,7 @@ PP(pp_send)
 		    DIE(aTHX_ "Offset outside string");
 		}
 		offset += blen_chars;
-	    } else if (offset >= (IV)blen_chars && blen_chars > 0) {
+	    } else if (offset >= (IV)blen_chars) {
 		Safefree(tmpbuf);
 		DIE(aTHX_ "Offset outside string");
 	    }