Select Code to Download

#!/usr/bin/perl

...
  print "$row->[0] $row->[1] ($row->[2])\n";
}
$dbh->disconnect;

Users with last name: user
========================================
Super User (superuser)
Joe User (joe)
test user (tester1)

my $sql = qq/SELECT first_name, last_name, login_name 
               FROM sys_user_bad_table_name  
              WHERE last_name = ?/;

Could not execute database statement! (Error: DBD::mysql::st 
execute failed: Table 'mydb.sys_user_bad_table_name' doesn't 
exist at pm_dbi_exception.pl line 16.)