# NOTE: Derived from ../../lib/POSIX.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package POSIX; #line 125 "../../lib/POSIX.pm (autosplit into ../../lib/auto/POSIX/opendir.al)" sub opendir { usage "opendir(directory)" if @_ != 1; my $dirhandle; CORE::opendir($dirhandle, $_[0]) ? $dirhandle : undef; } # end of POSIX::opendir 1;