Select Code to Download

my $pr1 = qq{select customer_name  from customer  where id = $emp_id }
+;

...
$sth1->execute();
$cust_id;
$sth1->bind_columns( undef, \$cust_id );