--- Filesys-SmbClient-1.4/SmbClient.xs	2002-10-17 15:12:53.000000000 +0200
+++ Filesys-SmbClient-1.4+opendir_fix/SmbClient.xs	2003-10-12 16:16:55.000000000 +0200
@@ -159,8 +159,14 @@
          if (dirp)
           {
           XPUSHs(sv_2mortal(newSVnv(dirp->smbc_type)));
+/*
+ * 	  original code here produces strings which include NULL as last char
+ *
           XPUSHs(sv_2mortal((SV*)newSVpv(dirp->name, dirp->namelen)));
           XPUSHs(sv_2mortal((SV*)newSVpv(dirp->comment, dirp->commentlen)));
+*/
+          XPUSHs(sv_2mortal((SV*)newSVpv(dirp->name, strlen(dirp->name))));
+          XPUSHs(sv_2mortal((SV*)newSVpv(dirp->comment, strlen(dirp->comment))));
           }
 
 
