--- Net-Server-0.87/lib/Net/Server.pm.dist Tue Apr 22 14:38:13 2003 +++ Net-Server-0.87/lib/Net/Server.pm Tue Apr 22 14:39:16 2003 @@ -402,7 +402,7 @@ $self->log(1,"Group Not Defined. Defaulting to EGID '$)'\n"); $prop->{group} = $); }else{ - if( $prop->{group} =~ /^(\w+( \w+)*)$/ ){ + if( $prop->{group} =~ /^([\w\-]+( [\w\-]+)*)$/ ){ $prop->{group} = eval{ get_gid( $1 ) }; $self->fatal( $@ ) if $@; }else{ @@ -416,7 +416,7 @@ $self->log(1,"User Not Defined. Defaulting to EUID '$>'\n"); $prop->{user} = $>; }else{ - if( $prop->{user} =~ /^(\w+)$/ ){ + if( $prop->{user} =~ /^([\w\-]+)$/ ){ $prop->{user} = eval{ get_uid( $1 ) }; $self->fatal( $@ ) if $@; }else{ Index: Net-Pcap-0.05/Makefile.PL --- Net-Pcap-0.05/Makefile.PL.orig 2004-02-28 23:41:40.000000000 +0100 +++ Net-Pcap-0.05/Makefile.PL 2004-02-28 23:45:17.000000000 +0100 @@ -10,7 +10,8 @@ 'NAME' => 'Net::Pcap', 'DISTNAME' => 'Net-Pcap', 'VERSION_FROM' => 'Pcap.pm', - 'LIBS' => ['-lpcap'], + 'INC' => '-I@l_prefix@/include', + 'LIBS' => ['-L@l_prefix@/lib -lpcap'], dist => { 'COMPRESS' => "gzip -9f", 'SUFFIX' => "gz" Index: Net-Pcap-0.05/Pcap.xs --- Net-Pcap-0.05/Pcap.xs.orig 2003-06-14 14:15:18.000000000 +0200 +++ Net-Pcap-0.05/Pcap.xs 2004-02-28 23:43:47.000000000 +0100 @@ -18,7 +18,7 @@ #include "EXTERN.h" #include "perl.h" #include "XSUB.h" -#include +#include "pcap.h" #ifdef __cplusplus }