Select Code to Download

Select or download this

% perl /tmp/test.pl /etc/passwd
(in cleanup) IO::AIO: expected a working directory object as returned 
+by aio_wd during global destruction.
        (in cleanup) IO::AIO: expected a working directory object as r
+eturned by aio_wd during global destruction.
direct call: [65024][73604][33188][1][0][0][0][2235][1319839401][13198
+39401][1319839401][1024][6]
thread call: [65024][73604][33188][1][0][0][0][2235][1319839401][13198
+39401][1319839401][1024][6]

Select or download this

#!/usr/bin/env perl
use strict;
...
    IO::AIO::flush;
    return(@lstat);
}