zfs recurive snapshot removal hack

zfs-snapshot-removal-hack.txt

root@dev-11:/usr/local/bin # zfs list -t snapshot
NAME                                           USED  AVAIL     REFER  MOUNTPOINT
zvm@base_install_clean                           0B      -       96K  -
zvm/dev-11-home@base_install_clean             130M      -     16.0G  -
zvm/dev-11-root@base_install_clean            17.0M      -      573M  -
zvm/dev-11-tmp@base_install_clean             3.11M      -     76.4M  -
zvm/dev-11-usr@base_install_clean              184M      -     4.40G  -
zvm/dev-11-var@base_install_clean             1.44G      -     4.20G  -
zvm/dev-11-var-lib-docker@base_install_clean   178M      -     3.11G  -
zvm/test@base_install_clean                      0B      -       56K  -

root@dev-11:/usr/local/bin # perl -e 'foreach  (split(/\n/,`zfs list -t snapshot`)) { my ($a,@b) = split(/\s+/,$_); if ($a=~m/\@/) { print "destroy: $a\n"; `zfs destroy $a` } }'

root@dev-11:/usr/local/bin # zfs list -t snapshot
no datasets available

root@dev-11:/usr/local/bin # zfs list
NAME                        USED  AVAIL     REFER  MOUNTPOINT
zvm                         274G   625G       96K  /zvm
zvm/dev-11-home            68.2G   677G     16.0G  -
zvm/dev-11-root            13.6G   638G      610M  -
zvm/dev-11-tmp             13.6G   639G     77.0M  -
zvm/dev-11-usr             27.3G   648G     4.55G  -
zvm/dev-11-var             13.6G   635G     4.28G  -
zvm/dev-11-var-lib-docker   136G   757G     4.32G  -
zvm/test                   1.03G   626G       56K  -