Re: Flushing all Buffers Before Exiting

[Curt]

On 2019-03-26, <to...@tuxteam.de> <to...@tuxteam.de> wrote:
>
>
> On Tue, Mar 26, 2019 at 11:43:24AM -0500, David Wright wrote:
>
> [...]
>
>> So these are issues beyond the scope of the OP's problem domain.
>> OTOH, IMO, trapping a USR1 signal [...]
>
> In this case, an atexit handler seems the right tool. Since the
> OP is using Perl, the END {...} block is our friend.

Is this in the ballpark?

 $SIG{INT} = \&tsktsk;

 sub tsktsk {
    $SIG{INT} = \&tsktsk;           # See ``Writing A Signal Handler''
    warn "\aThe long habit of living indisposeth us for dying.\n";
}