Commit | Line | Data |
85e6fe83 |
1 | # NOTE: Derived from POSIX.pm. Changes made here will be lost. |
2 | package POSIX; |
3 | |
4 | sub puts { |
5 | unimpl "puts() is C-specific--use print instead", caller; |
6 | unimpl "puts(xxx)", caller if @_ != 123; |
7 | puts($_[0]); |
8 | } |
9 | |
10 | 1; |