summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
033f628)
We only declare a Perl 5.10.1+ requirement, and POSIX::lround
was not added until 5.21.4 (5.22.0 for stable releases).
use parent qw(Exporter);
use bytes ();
use Fcntl qw(SEEK_SET O_RDONLY O_NONBLOCK);
use parent qw(Exporter);
use bytes ();
use Fcntl qw(SEEK_SET O_RDONLY O_NONBLOCK);
-use POSIX qw(strftime lround);
use HTTP::Date qw(time2str);
use HTTP::Status qw(status_message);
use Errno qw(EACCES ENOTDIR ENOENT);
use HTTP::Date qw(time2str);
use HTTP::Status qw(status_message);
use Errno qw(EACCES ENOTDIR ENOENT);
+ sprintf('%lu', $size).$suffix;
}
# by default, this returns "index.html" if it exists for a given directory
}
# by default, this returns "index.html" if it exists for a given directory