use warnings; use strict; print ord "\x{A}" if "\x{000A}" eq "\n";