[tpm] What does this line of Perl code mean?

[Digimer]

On 10-03-18 05:53 PM, Indy Singh wrote:
> Hi all,
>
> What does the following line of code mean and why is it needed?
> local $SIG{__WARN__} = \&dirty;

When the program catches a SIGWARN signal, it calls the 'dirty' function.

-- 
Digimer
E-Mail:         linux at alteeve.com
AN!Whitepapers: http://alteeve.com
Node Assassin:  http://nodeassassin.org