Select Code to Download

use strict;
use Carp;
...
    AddEntity($test->[0],$test->[1]);
  }
}

sub AddEntity{
  my($type,$name) = @_;
...
  }
  return 1;
}

Max ENTITIES ID: 516
COUNTRY:UNITED_STATES ID = 24
...
\'FRE...') called at C:\DBtest.pl line 26
        main::AddEntity('PERSON', 'FRED') called at C:\DBtest.pl line 
+16