system qq(p4 sync -k "$options{v}");
system qq(p4 -x "$options{f}" delete) if (exists $options{f});
# ... etc.