| … | |
… | |
| 32 | package Linux::AIO; |
32 | package Linux::AIO; |
| 33 | |
33 | |
| 34 | use base 'Exporter'; |
34 | use base 'Exporter'; |
| 35 | |
35 | |
| 36 | BEGIN { |
36 | BEGIN { |
| 37 | $VERSION = 1.2; |
37 | $VERSION = 1.3; |
| 38 | |
38 | |
| 39 | @EXPORT = qw(aio_read aio_write aio_open aio_close aio_stat aio_lstat aio_unlink); |
39 | @EXPORT = qw(aio_read aio_write aio_open aio_close aio_stat aio_lstat aio_unlink); |
| 40 | @EXPORT_OK = qw(poll_fileno poll_cb min_parallel max_parallel nreqs); |
40 | @EXPORT_OK = qw(poll_fileno poll_cb min_parallel max_parallel nreqs); |
| 41 | |
41 | |
| 42 | require XSLoader; |
42 | require XSLoader; |
| … | |
… | |
| 107 | error when stat'ing a large file, the results will be silently truncated |
107 | error when stat'ing a large file, the results will be silently truncated |
| 108 | unless perl itself is compiled with large file support. |
108 | unless perl itself is compiled with large file support. |
| 109 | |
109 | |
| 110 | =item aio_unlink $pathname, $callback |
110 | =item aio_unlink $pathname, $callback |
| 111 | |
111 | |
| 112 | Asynchronously unlink a file |
112 | Asynchronously unlink a file. |
| 113 | |
113 | |
| 114 | =cut |
114 | =cut |
| 115 | |
115 | |
| 116 | min_parallel 1; |
116 | min_parallel 1; |
| 117 | |
117 | |
| … | |
… | |
| 135 | L<Coro>. |
135 | L<Coro>. |
| 136 | |
136 | |
| 137 | =head1 AUTHOR |
137 | =head1 AUTHOR |
| 138 | |
138 | |
| 139 | Marc Lehmann <pcg@goof.com> |
139 | Marc Lehmann <pcg@goof.com> |
| 140 | http://www.goof.com/pcg/marc/ |
140 | http://home.schmorp.de/ |
| 141 | |
141 | |
| 142 | =cut |
142 | =cut |
| 143 | |
143 | |
