Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
while(<>){
  print encode( "ucs-2be", $_ );
}
  2. or download this
    #!/usr/bin/perl

...
while(<>){
  print decode( "ucs-2be", $_ );
}