perl -lwe  "system(qw(bkill 4711))"