Help for this page

Select Code to Download

Select or download this

$SIG{__WARN__} = sub { set_dberror(join('',@_))};

Select or download this

local $SIG{__WARN__} = sub { set_dberror(join('',@_))};