sub long_running_function {
  ...
  while ($your_condition) {
    ...
    return undef if -f $post_file; # Or die() if you want
    ...
  }
}

unlink $post_file; # May fail silently, but who cares?
...
&long_running_function();
...