String Perl

  1. Home
  2. Perl
  3. String
  4. Output string as UCS2
use Unicode::String;
my $string = "This is a test\n";
my $u = Unicode::String->new($string);
# print as UCS2
print $u->ucs2;