ftp.cse.unsw.edu.au/2014.06.ftp.cse.unsw.edu.au.tar/ftp.cse.unsw.edu.au/pub/doc/languages/perl/nutshell/ch4/syscall

Text File | 1992-10-18 | 112 b | 3 lines

require 'syscall.ph';           # may need to run h2ph
syscall(&SYS_setgroups, @groups+0, pack("i*", @groups));