% perl -012 -e 'print ord $/'
% perl -0012 -e 'print ord $/'