Select Code to Download

 &MLMP::OpenCompanyDB;
  &MLMP::CompanyLinks($fields{'userid'},$fields{'parent'});

#!/usr/bin/perl
###########################################################
# MLM Manager 2.0 Pro
...
 $ENV{'DOCUMENT_URI'} =~ /\/(\w+\.\w+)$/;
 return ("MAINSITE",$1); 
 }