Edit File: getgroups.al
# NOTE: Derived from ../../lib/POSIX.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package POSIX; #line 690 "../../lib/POSIX.pm (autosplit into ../../lib/auto/POSIX/getgroups.al)" sub getgroups { usage "getgroups()" if @_ != 0; my %seen; grep(!$seen{$_}++, split(' ', $) )); } # end of POSIX::getgroups 1;
Back to File Manager