myFunc(\*FH);
seek FH, 0, 0;
myFonc(\*FH);  # the repaired one :)