perl 5.0 alpha 9

[p5sagit/p5-mst-13.2.git] / lib / auto / POSIX / getlogin.al

# NOTE:  Derived from POSIX.pm.  Changes made here will be lost.
package POSIX;

sub getlogin {
    usage "getlogin(xxx)", caller if @_ != 0;
    getlogin();
}

1;