$dbh = MSSQL::DBlib->dblogin($user, $pwd, $server);
$dbh->bcp_init("billing.dbo.commphone", '', '',DB_IN);
$dbh->bcp_meminit(10);
$dbh->bcp_sendrow(@data);
$dbh->bcp_batch;