summaryrefslogtreecommitdiff
path: root/get.pl
diff options
context:
space:
mode:
Diffstat (limited to 'get.pl')
-rwxr-xr-xget.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/get.pl b/get.pl
index d5c2be6..2081bb8 100755
--- a/get.pl
+++ b/get.pl
@@ -10,7 +10,7 @@ sub sanitize ($) {
$s =~ s/^\s+//;
$s =~ s/\s+$//;
$s =~ s/\.[^.]+$//g;
- $s =~ s/\W//g;
+ $s =~ s/[-\[\]\(\)\+\*\\\/\'\"\`\!\@\#\$\%\^\&]//g
$s =~ s/\s+/_/g;
if (length($s) == 0) {
print "fn is empty";