sleep&0.05");}sub&limits&{print&"\e[3;2H";for($i=0;$ #### sleep&1");}sub&limits&{print&"\e[3;2H";for($i=0;$