Ok, maybe I'm a moron 'cause I'm not seeing it, but *what* are these things - `Stat`, `Project`, and `Version`??? If Stat, Project, and Version are column names, then you *don't* need to quote them, especially with backticks, which have special meaning in Perl.

And, as hardburn already said, and others including myself have suggested to you before in previous nodes, USE PLACEHOLDERS. Is there a reason that you are intentionally not using placeholders?

In this code:

   while (my ($identifier)=$sth->fetchrow_array ) {
[download]

fetchrow_array returns an *array* - not an array reference. So, $identifier in that line should be @identifier. Or, change fetchrow_array to fetchrow_arrayref.

Another problem which others have already pointed out - when you do 'select *', you have no idea what order the columns are being fetched in. If you explicitely named the columns in the select, then you know what order they are fetched in so you can order the fields receiving the fetch, like this:

   my $sth=$dbh->prepare(qq{
      SELECT name,
             state,
             phone
      FROM user
   });
   $sth->execute();
   while (my ($name, $state, $phone)=$sth->fetchrow_array ) {
     ### now you can use $name, $state, and $phone ###
     print "User name:  $name\n";
     print "     state: $state\n";
     print "     phone: $phone\n";
   }

   $sth->finish;
[download]

HTH.