C:\Users\ken\tmp\pm_11149351_unicode_filenames>dir
 Volume in drive C is Primary Drive
 Volume Serial Number is 5A0C-01CD

 Directory of C:\Users\ken\tmp\pm_11149351_unicode_filenames

04-Jan-23  15:06    <DIR>          .
04-Jan-23  15:06    <DIR>          ..
04-Jan-23  14:18               337 mkfiles.pl
04-Jan-23  15:03               271 mvfiles.pl
               2 File(s)            608 bytes
               2 Dir(s)  1,533,002,100,736 bytes free

C:\Users\ken\tmp\pm_11149351_unicode_filenames>more mkfiles.pl
#!perl

use strict;
use warnings;
use autodie;

my $emoji_airplane = "\x{2708}\x{FE0F}";
my $emoji_envelope = "\x{2709}\x{FE0F}";

my @fnames = (
    'AIR_2708_FE0F',
    "___ $emoji_airplane $emoji_airplane",
    'ENV_2709_FE0F',
    "___ $emoji_envelope $emoji_envelope",
);

for my $fname (@fnames) {
    open my $fh, '>', $fname;
}

C:\Users\ken\tmp\pm_11149351_unicode_filenames>perl mkfiles.pl