perl -ne 's/^(\w+)\s+([-|+])/[NAME] \2/g; print'
}
+_qmount()
+{
+ umount $SCRATCH_DEV >/dev/null 2>&1
+ mount -t xfs $SCRATCH_DEV $SCRATCH_MNT || _fail "qmount failed"
+ chmod ugo+rwx $SCRATCH_MNT
+ misc/quot $SCRATCH_DEV >>$seq.full 2>&1
+}
# make sure this script returns success
/bin/true