X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=samples%2Fhash2array.pl;fp=samples%2Fhash2array.pl;h=72cd2657ee2c1c689e85442bbca1f77b20d68330;hb=92240461f2d526a94139ed4cf0fff445465b380d;hp=b26950a272eb343c311d2aea274e634965ff51e1;hpb=ddbfd527f4c54458985145aae3a837a8f5868551;p=perl%2Fmodules%2Fautovivification.git

diff --git a/samples/hash2array.pl b/samples/hash2array.pl
index b26950a..72cd265 100644
--- a/samples/hash2array.pl
+++ b/samples/hash2array.pl
@@ -49,6 +49,7 @@ while (<$hash_t>) {
   }
   $buf .= $suffix;
   $buf =~ s/\s+/ /g;
+  $buf =~ s/\s+$//;
   print $array_t "$buf\n";
  }
 }