C:\_32>type try.pl
open(my $x,">&STDOUT");

C:\_32>perl try.pl

C:\_32>perl -le "open(my $x,\">&STDOUT\");"
>& was unexpected at this time.

C:\_32>