# $dest was set to "sdb" through a shell argument mounted_disks=$(mount | perl -nae 'BEGIN{$d=shift}; push @m, $F[2] if m{/dev/$d}; END{print join(" ", sort {length($b)<=>length($a)} @m)}' $dest) umount -l $mounted_disks