PERL-262 read preference implementation