system("/bin/su", "user", "-c", "perl", $0, @args);