Mit der Funktion tell können sie die aktuelle Position des Filehandle abfragen und mit seek können sie die aktuelle Position ändern. Hier ein Demonstrationsprogramm dazu, was ausreichend kommentiert ist.......

#!/usr/bin/perl -w

use POSIX;

open(FH, "Neuedatei.txt") or die $!;

seek(FH, 5, SEEK_SET); #+5Bytes vom Anfang (SEEK_SET)
$byte=tell FH; #akt. Position abfragen
print "POS.: " , $byte , "\n";

seek(FH, 6, SEEK_CUR); #+6Bytes von der aktuellen
 Position(SEEK_CUR) $byte=tell FH;
print "POS.: " , $byte , "\n";

seek(FH, 0, SEEK_END); #Dateiende (SEEK_END)
$byte=tell FH;
print "POS.: " , $byte , "\n";

seek(FH, -20, SEEK_END); #Vom Dateiende 20 Bytes zurück
 (SEEK_END) $byte=tell FH;
print "POS.: " , $byte , "\n";

seek(FH, -15, SEEK_CUR); #Von der aktuellen Position 15 Bytes zurück
$byte=tell FH;
print "POS.: " , $byte , "\n";

seek(FH, 0, SEEK_SET); #Zum Dateianfang
$byte=tell FH;
print "POS.: " , $byte , "\n";

close(FH);