Nikolay Mishin <[email protected]> писал(а) в своём письме Mon, 28 Oct 2013 17:10:27 +0400:

в eval ""

Moscow PM,привет!!

есть скрипт, в котором написано

use open ':locale';

в unix все работает

в win32

Cannot figure out an encoding to use at trans.pl line 25

как сделать так, чтобы use использовалась взависимости от OS

в BEGIN что-ли запихнуть?

use Devel::CheckOS qw(os_is);

BEGIN {
if ( os_is('Unix') ) {

use open ':locale';
}
}

https://github.com/mishin/gists/blob/master/trans.pl
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить