open (COUNTING, ">/path/to/counter.txt")
  or die "Cannot open: $!\n";
print COUNTING $myvar;
close COUNTING;