C:\test>perl -E"say $^E=2311"
This device is not shared