commit 59a96948f2fab151410f0d26abe8a43458a73c8e
Author: spesk1 <spesk@pm.me>
Date: Mon Jul 29 14:50:55 2019 -0400
Added stripping on sq brackets
diff --git a/strip_filename.pl b/strip_filename.pl
index d609b3d..17ec7ae 100755
--- a/strip_filename.pl
+++ b/strip_filename.pl
@@ -16,7 +16,7 @@ sub strip_filename($) {
foreach my $char ( @chars ) {
if ( $char =~ m/\s/ ) {
next;
- } elsif ( $char =~ m/\(|\)|\\|\'|\$|\!|,/ ) {
+ } elsif ( $char =~ m/\(|\)|\\|\'|\$|\!|,|\[|\]/ ) {
next;
} else {
print $fh $char;