Actually when I fetch records from Database then I getting question marks
for arabic characters,  so any one can help me to solve this issue.
 

my $dbh = DBI->connect("dbi:ODBC:sms", "smser", "smspassword")
     || die  "Can't connect to $DBI::errstr";

my $sth = $dbh->prepare( q{
            select Messagetype,message,mobilenumber from sms where status=0 
  }) || die "Can't prepare statement: $DBI::errstr";

my $rc1 = $sth->execute()
   || die "Can't execute the statement  : $DBI::errstr";

while (($Messagetype,$message,$mobilenumber) = $sth->fetchrow_array)
  {
   print "$message \n ";
}

Here printing question marks but in database data is in Arabic.

Thanks.

Reply via email to