How do I retrieve the terminal width in Perl?

Question

I want to output a progress bar, but how do I retrieve the terminal width in Perl?

A core Perl solution would be preferred, since I don\'t have access to a compiler

Answer 1

If you want to make a progress bar, don't sweat the details. Use one of the many progress bar modules on CPAN and be done with it.