Select Code to Download

#!/usr/bin/perl
use Time::HiRes qw(sleep);
...
    "sa",
    "password" )
  or die "Usage ctp name, sa user password, 1st Sub_id, Subscriber Ran
+ge";

DBI connect('server=ctp-1-zone157; port=5000; database=PP_DB; interfac
+es=/opt/sybase/interfaces','sa',...) failed: OpenClient message: LAYE
+R = (6) ORIGIN = (8) SEVERITY = (5) NUMBER = (1)
Server ctp-1-zone157, database
Message String: ct_connect(): directory service layer: internal direct
+ory control layer error: There was an error encountered while binding
+ to the directory service.
 at ./connectDB.pl line 6
Usage ctp name, sa user password, 1st Sub_id, Subscriber Range at ./co
+nnectDB.pl line 6.