/[virtual-ldap]/bin/ldap-koha.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /bin/ldap-koha.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 34 by dpavlin, Mon Mar 23 21:55:39 2009 UTC revision 37 by dpavlin, Wed Mar 25 21:24:33 2009 UTC
# Line 8  use IO::Socket; Line 8  use IO::Socket;
8  use lib 'lib';  use lib 'lib';
9  use LDAP::Koha;  use LDAP::Koha;
10    
11  my $listen = '10.60.0.13:2389';  my $listen = shift @ARGV || 'localhost:2389';
12    
13  my $sock = IO::Socket::INET->new(  my $sock = IO::Socket::INET->new(
14          Listen => 5,          Listen => 5,
15          Proto => 'tcp',          Proto => 'tcp',
16          Reuse => 1,          Reuse => 1,
17          LocalAddr => $listen,          LocalAddr => $listen,
18  ) || die;  ) || die "can't listen to $listen $!";
19    
20  warn "# listening on $listen";  warn "# listening on $listen";
21    
Legend:
Removed from v.34  
changed lines
  Added in v.37
  ViewVC Help
Powered by ViewVC 1.1.26