1Regexp::Common::profaniUtsye(r3)Contributed Perl DocumenRteagteixopn::Common::profanity(3)
2
3
4
6 Regexp::Common::profanity -- provide regexes for profanity
7
9 use Regexp::Common qw /profanity/;
10
11 while (<>) {
12 /$RE{profanity}/ and print "Contains profanity\n";
13 }
14
16 Please consult the manual of Regexp::Common for a general description
17 of the works of this interface.
18
19 Do not use this module directly, but load it via Regexp::Common.
20
21 $RE{profanity}
22 Returns a pattern matching words -- such as Carlin's "big seven" --
23 that are most likely to give offense. Note that correct anatomical
24 terms are deliberately not included in the list.
25
26 Under "-keep" (see Regexp::Common):
27
28 $1 captures the entire word
29
30 $RE{profanity}{contextual}
31 Returns a pattern matching words that are likely to give offense when
32 used in specific contexts, but which also have genuinely non-offensive
33 meanings.
34
35 Under "-keep" (see Regexp::Common):
36
37 $1 captures the entire word
38
40 Regexp::Common for a general description of how to use this interface.
41
43 Damian Conway (damian@conway.org)
44
46 This package is maintained by Abigail (regexp-common@abigail.be).
47
49 Bound to be plenty.
50
51 For a start, there are many common regexes missing. Send them in to
52 regexp-common@abigail.be.
53
55 This software is Copyright (c) 2001 - 2017, Damian Conway and Abigail.
56
57 This module is free software, and maybe used under any of the following
58 licenses:
59
60 1) The Perl Artistic License. See the file COPYRIGHT.AL.
61 2) The Perl Artistic License 2.0. See the file COPYRIGHT.AL2.
62 3) The BSD License. See the file COPYRIGHT.BSD.
63 4) The MIT License. See the file COPYRIGHT.MIT.
64
65
66
67perl v5.32.1 2021-01-27 Regexp::Common::profanity(3)