1 files changed, 0 insertions, 1 deletions

diff --git a/pp_sys.c b/pp_sys.c
index f7e254274f..83dfb193da 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -699,7 +699,6 @@ PP(pp_binmode)
     PerlIO *fp;
     MAGIC *mg;
     SV *discp = Nullsv;
-    STRLEN len  = 0;
 
     if (MAXARG < 1)
 	RETPUSHUNDEF;