Есть основной скрипт:
use strict;
BEGIN { require \'./modules.pl\'; }
if (\'a\' > 1) { print "Warnings Test"; }
my $t = \'Тест\';
print "W: $t\\n";
$t =~ s/т/1/gi;
print "W: $t\\n";
и файл, который должен подгружать модули - \'modules.pl\':
require 5.004;
use strict;
use warnings; use diagnostics;
use locale;
use POSIX qw(locale_h);
setlocale(LC_CTYPE,"ru_RU.CP1251");
При этом \'use warnings; use diagnostics;\' пробрасывается в основной скрипт, а вот \'use locale;\' нет.
В чем проблема?
Как добиться чтобы
use locale;
use POSIX qw(locale_h);
setlocale(LC_CTYPE,"ru_RU.CP1251");
пробрасывался в основной скрипт?