Current Path : /proc/2/root/usr/lib64/perl5/auto/POSIX/ |
Current File : //proc/2/root/usr/lib64/perl5/auto/POSIX/toupper.al |
# NOTE: Derived from ../../lib/POSIX.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package POSIX; #line 108 "../../lib/POSIX.pm (autosplit into ../../lib/auto/POSIX/toupper.al)" sub toupper { usage "toupper(string)" if @_ != 1; uc($_[0]); } # end of POSIX::toupper 1;