# open your file
$top_of_file = tell(FILE);
# go fetch your variable
seek(FILE, $top_of_file, 0);
# now you're back at the top