This code runs without error (or output, for that matter. It doesn't even render the main window) on ActivePerl 5.10 for win32. What is the error and what version of perl are you using?

edit: I'm a dork. I was able to reproduce this error. Interestingly, putting the width in single quotes sidesteps the problem.