Select Code to Download

my $sql = qq{
if not exists
    (select 1 from members where username = ?)
...
my $sth = $dbh->prepare($sql);
$sth->execute($username, $username,
    $password, $email, $name, $url, $date)