http://www.perlmonks.org?node_id=552507


seek and process from there on