Monthly Archives: November 2008

UTF-8 Solution

#!/usr/local/git/bin/perl # Test Char Set Issue # Tested By : Sivasakthi kumar # IM : Sivasakthikumar@gmail.com use DBI; use DBD::Oracle qw(:ora_types); use utf8; use Encode;   $string = “FuÔbalÀl”;   $ENV{NLS_LANG} = “.UTF8”; $ENV{NLS_NCHAR} = “AL32UTF8”; print “Before Insert DataBase :”; print “$string”;   my $dbh; $dbh = DBI->connect(“DBI:Oracle:SID=tosipo;HOST=”localhost”;PORT=1521″, teststage, SSaih, {RaiseError => 1, PrintError… Read More »