usw - use utf8; use strict; use warnings; in one line.
use usw; # is just 8 bytes pragma instead of below: use utf8; use strict; use warnings; my $cp = '__YourCP__' || 'UTF-8'; binmode \*STDIN, ':encoding($cp)'; binmode \*STDOUT, ':encoding($cp)'; binmode \*STDERR, ':encoding($cp)';
usw is like a shortcut pragma that works in any environment.
May be useful for those who write the above code every single time.
use usw;
It seems a kind of pragmas but doesn't spent %^H because overusing it is nonsense.
use usw; should be just the very shortcut at beginning of your codes.
Therefore, if you want to set no, you should do it the same way as before.
no
no strict; no warnings; no utf8;
These still work as expected everywhere.
And writing like this doesn't work.
no usw;
Since version 0.12, it dies with warning.
It replaces $SIG{__WARN__} or/and $SIG{__DIE__} to avoid the bug(This may be a strange specification) of encoding only the file path like that:
$SIG{__WARN__}
$SIG{__DIE__}
宣言あり at t/script/00_è¦åãã.pl line 19.
Since version 0.07, you can relate automatically STDIN,STDOUT,STDERR with cp\d+ which is detected by Win32 module.
STDIN
STDOUT
STDERR
cp\d+
Since version 0.08, you don't have to care if the environment is a Windows or not.
Copyright (C) worthmine.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Yuki Yoshida(worthmine)
To install usw, copy and paste the appropriate command in to your terminal.
cpanm
cpanm usw
CPAN shell
perl -MCPAN -e shell install usw
For more information on module installation, please visit the detailed CPAN module installation guide.