# Get max display width; either get it via 'resize' for xterms or default to 180. my ($w) = qx#/usr/bin/resize# =~ /(\d+)/; $w ||= 180;