SZ
Size: a a a
SZ
OP
МК
print for grep { defined }
@{ { map { lc ,=> $_ } @a } }
{ map { lc } @b };
SZ
МК
SZ
DF
SZ
DF
SZ
YK
use constant +{
debug => $ENV{debug} // 0,
info_level => 0,
warn_level => 1,
err_level => 2
};
do { ... } if debug >= warn_level;
VT
VG
VG
SZ
SZ
SZ
VG
#ifdef
в СиVG
VG