Re: Perl 5 Module List

Jack Shirazi - BIU (js@bison.lif.icnet.uk)
Thu, 2 Mar 95 12:28:22 GMT


> HEAD should be fairly simple (famous last words :-). I'll print out
> the module and look at it on the way home - if HEAD support is quick
> and easy I'll add it. Don't hold your breath though.

Had a quick peek while I printed it out, and there is a trivial
change needed to support head - if I remember what head does ;-)

Here's the diff:


38c38
<     'HEAD',       1,
---
>     'HEAD',       0,
114d113
<     if($method eq 'HEAD') {$ftype = 'd'}


i.e. just change AllowedMethods to support HEAD, and add a line just before
the call to get_ftp_request specifying that the file type is a directory ('d')
- this returns a 'dir' of the file instead of the file istelf.