perl IO-Pager