#$r=25; $c=80;
`resize` =~ /=(\d+).*=(\d+)/s; $c=$1,$r=$2;