use Config;

my @names = split ' ', $Config{sig_name};
print grep /WINCH/, @names;