my ($cmd, @args) = ("/pfad/zu/programm", "sudo", "shutdown, "-r", "30);
system($cmd, @args) == 0 or die "Could not execute $cmd: $?";