Help for this page
my $negated = qr{^(?!.*?$regex)}s;
#!/usr/bin/perl use warnings; ... unlike $_, $re; } }