1package uni::perl::ru; 2 3use uni::perl; 4use uni::perl::encodebase; 5m{ 6use strict; 7use warnings; 8}x; 9 10our $LOADED; 11sub load { 12 $LOADED++ and return; 13 uni::perl::encodebase::generate(qw(cp1251 koi8r cp866)); 14 return; 15} 16 171; 18