sub tainted {
    local($@);
    eval { kill 0 * $_(0) };
    $@ =~ /^Insecure/;
}
1;