openpkg-packages/perl-net/perl-net.patch

--- 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 <pcap.h>
+#include "pcap.h"
 
 #ifdef __cplusplus
 }