I apologize for not being clear enough, but this is a Perl question. The script I am trying to modify currently runs a SELECT query with a WHERE statement multiple times within a foreach loop. I would like to run the query once and pull the necessary data from an array instead. Below is the segement of code I'm working with: 

# Bind to LDAP Server
$ldap = Net::LDAP->new( $ldapServer ) or die "$@";
$bind = $ldap->bind( $ldapUser, password => $ldapPass );

# Connect to SQL Server
$connect = Mysql->connect($sqlServer, $sqlDB, $sqlUser, $sqlPass);
$connect->selectdb($sqlDB);

$ldapResult     = $ldap->search(
        base => $ldapBaseOU,
        filter => "(&(usertype=Employee))",
        attrs => @ldapAttrs
);

$sqlQuery       = "SELECT username,email,phone FROM users";
$sqlResult      = $connect->query($sqlQuery);

print $sqlResult;

my @entries = $ldapResult->entries;

my $entry;
foreach $entry ( @entries )
{
        my $username = $entry->get_value ( 'sAMAccountName' );
        my $dn = $entry->dn;
        
        ### ***** Insert Match Here ***** ###
        $phone = ??
        $email = ??

}

# Unbind from LDAP Server
$bind = $ldap->unbind;

[download]

In the section noted as "***** Insert Match Here *****, I would like to be able to use the $username value pulled from LDAP and match it to the 'username' value pulled from MySQL to set the phone and email variables.

Thanks!

In reply to Re^2: Referencing MySQL Results by Column by TheBiscuit
in thread Referencing MySQL Results by Column by TheBiscuit

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.