my $SQL = 'SELECT ID, DDATE FROM MYTEMP4
           WHERE EXTRACT(MONTH FROM DDATE) = ?
             AND EXTRACT(YEAR FROM DDATE) = ?';
my $sth = $dbh->prepare($SQL);
$sth->execute(8,2015);
while (my @f = $sth->fetchrow_array){
  print join " ",@f,"\n";
}

##</code><code>##

my $SQL = "SELECT ID, DDATE FROM MYTEMP4
           WHERE to_char(DDATE,'mm/dd/yyyy') LIKE ?";
my $sth = $dbh->prepare($SQL);
$sth->execute('08/%/2015');