Currently I am trying this, which is not working- " $product = $ARGV[0]; $file = $ARGV1; system("type $file > templog.txt"); open(A, "templog.txt") || die "can't open intput file"; while() { $linein = $_; print $linein; } " Which is printing the wide character string. Not sure, how do I open using the open(my $log_fh, '<:encoding(UCS-2le)', $log_qfn) and still read it line by line?

Comment on Re^2: Reading wide character string from a file