Quickly free up space with perl

rust-lang · Dec 12, 2024 · e447a4f · e447a4f
1 parent ce5b7e5
commit e447a4f
Showing 1 changed file with 5 additions and 6 deletions.
diff --git a/src/ci/scripts/free-disk-space.sh b/src/ci/scripts/free-disk-space.sh
@@ -4,13 +4,12 @@
 # # ======
 # MACROS
 # ======
-
+set -e
 fast_rmdir() {
-if [[ -d "$1" ]] && [[ -n "$1" ]] && [[ ! "$1" = "/" ]] && [[ ! "$1" = "~" ]]; then
-    echo "Removing directory: $1"
-    sudo find "$1" -type f -delete -print | wc -l
-    sudo rm -rf "$1"
-fi
+    cd "$@"
+    pwd
+    ls
+    perl -e 'unlink for glob "*"'
 }
 
 list_installed_dpkg() {