Select Code to Download

print "\nEnter a brief description:  ";
  chomp($desc = <STDIN>);
...
    INSERT INTO $tbl_name (product_id, model_number, description)
    VALUES ($prod_id, $mod_num, $data)
  ");

... chomp(my @desc = <STDIN>);$data = $dbh->quote($desc[0]); ...