# This exports text as UTF8
open(TXT, ">:encoding(utf8)", 'c:\utf8_01.txt');
print TXT <<EOP;
<?xml version='1.0' encoding='UTF-8' standalone='yes' ?>
EOP
;
close TXT;

# This exports text as Windows 1252
open(TXT, ">:encoding(utf8)", 'c:\utf8_01.txt');
print TXT <<EOP;
xml version='1.0' encoding='UTF-8' standalone='yes' ?>
EOP
;
close TXT;

# This exports text as Windows 1252
open(TXT, ">:encoding(utf8)", 'c:\utf8_01.txt');
print TXT <<EOP;
<?xml version='1.0' encoding='UTF-8' standalone='yes' ?>
EOP
;
close TXT;