(Perl) Set and jump between named position markers on a filehandle