I have written this script below,

the output file generated but i still seeing, German "Umlaut" in the csv output file. Example : Björn

why the csv output file is not encoded into encoding(UTF-8)??, am i missed any steps here!!!!

#!/usr/bin/perl
use Net::LDAP;
use Encode;

$outputfile = 'C:\Meta\MDS\data\out\LicMan1.csv';
$outputfile2 = 'C:\Meta\MDS\data\out\LicMan.csv';

open (INPUT, "<:encoding(UTF-8)", $outputfile) or die "Cannot open fil
+ename for input: $!";
while (<INPUT>) {
    s/"//g;
    $replace .= $_;}
close INPUT or die "Cannot close filename: $!";
open (OUTPUT, ">:encoding(UTF-8)",$outputfile2) or die "Cannot open fi
+lename for output: $!";
print OUTPUT $replace;
close OUTPUT or die "Cannot close filename: $!";
[download]