Statistics
| Branch: | Tag: | Revision:

root / tools / perl / lib / auto / POSIX / gets.al @ fa47cac2

History | View | Annotate | Download (318 Bytes)

1
# NOTE: Derived from ..\..\lib\POSIX.pm.
2
# Changes made here will be lost when autosplit is run again.
3
# See AutoSplit.pm.
4
package POSIX;
5

    
6
#line 339 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\gets.al)"
7
sub gets {
8
    usage "gets()" if @_ != 0;
9
    scalar <STDIN>;
10
}
11

    
12
# end of POSIX::gets
13
1;