#!/usr/bin/perl use warnings; use strict; open OUTFILE, ">:utf8", "./myutf8file" or die $!; print OUTFILE "\xEF\xBB\xBF\n"; close OUTFILE;