while(<>){ print if (/^(\d+).+to.+(\d+)$/i); print "$1\n"; print "$2\n"; }