我想输出一个进度条,但如何在Perl中检索终端宽度？
核心Perl解决方案将是首选,因为我无法访问编译器,只需已安装的5.8.2 Perl.
terminal perl
perl ×1
terminal ×1