commit 5f29a73d13d5d888dbba80f498d570ecad0bc29c
author Manuel Pégourié-Gonnard <mpg@elzevir.fr> Mon Apr 20 12:27:12 2015 +0100
committer Manuel Pégourié-Gonnard <mpg@elzevir.fr> Mon Apr 20 12:27:12 2015 +0100
tree b5010a54b1d2836f85df913fc36d2350fa3f7227
parent e6028c93f5b6fec5a848a89951e3ef695fa16f7e

Fix regex in scripts/rename.pl again

scripts/rename.pl

diff --git a/scripts/rename.pl b/scripts/rename.pl
index 3377297..c169078 100755
--- a/scripts/rename.pl
+++ b/scripts/rename.pl
@@ -43,7 +43,7 @@
 my $string = qr/"(?:\\.|[^\\"])*"/;
 my $space = qr/\s+/;
 my $idnum = qr/[a-zA-Z0-9_]+/;
-my $symbols = qr/[-!#$%&'()*+,.\/:;<=>?@[\\\]^_`{|}~]+|"/;
+my $symbols = qr/[-!#\$%&'()*+,.\/:;<=>?@[\\\]^_`{|}~]+|"/;
 
 # if we replace inside strings, we don't consider them a token
 my $token = $do_strings ?         qr/$space|$idnum|$symbols/