title: How do I retrieve the terminal width in Perl?
body: <p>I want to output a progress bar, but how do I retrieve the terminal width in Perl? </p>
  
  <p>A core Perl solution would be preferred, since I don't have access to a compiler, just an already installed 5.8.2 Perl.</p>