aboutsummaryrefslogtreecommitdiff
path: root/sboclean
diff options
context:
space:
mode:
Diffstat (limited to 'sboclean')
-rwxr-xr-xsboclean2
1 files changed, 1 insertions, 1 deletions
diff --git a/sboclean b/sboclean
index 0c0e30a..3e4da48 100755
--- a/sboclean
+++ b/sboclean
@@ -53,7 +53,7 @@ sub remove_stuff {
my $dir = shift;
opendir (my $dh, $dir);
FIRST: while (my $ls = readdir $dh) {
- next FIRST if $ls =~ /^\.[\.]{0,1}$/;
+ next FIRST if $ls =~ /^(\.){1,2}$/;
my $full = "$dir/$ls";
if ($interactive eq 'TRUE') {
print "Remove $full? [n] ";