您的位置:首页 > 大数据 > 人工智能

列出main包内的所有变量情况

2009-12-06 21:29 218 查看
列出main
包内的所有变量情况

foreach $symname (sort keys %main::) {

local
*sym = $main::{$symname};

print
"/$$symname is defined/n" if defined $sym;

print
"/@$symname is nonnull/n" if

@sym;

print
"/%$symname is nonnull/n" if

%sym;

}
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐