http://qs1969.pair.com?node_id=101421
Category: Utility Scripts
Author/Contact Info Ovid
Description:

This is the Code::Police module. Provide this module to programmers who fail to use strict and most of their coding errors will be instantly eliminated.

################################
package Code::Police;
################################
$Code::Police::VERSION = 2.1828;
# Last updated August 1, 2001
#
# Module:       Code::Police
# Author:       Ovid
# Date Created: August 1, 2001
# Purpose:      This is the Code::Police module.  Provide this module 
+to programmers who fail
#               to use strict and most of their coding errors will be 
+instantly eliminated.
# --------------- Maintenance log ------------------------
# Date:
# Programmer:
# Action:
# --------------------------------------------------------
INIT{if(!exists$INC{'strict.pm'}){unlink((caller)[1])}}
"Ovid";
__END__

=head1 NAME

Code::Police - Enforce rigorous coding standards

=head1 SYNOPSIS

 #!/usr/bin/perl
 use Code::Police;
 
=head1 DESCRIPTION

This is the Code::Police module.  Provide this module to programmers w
+ho fail
to use strict and most of their coding errors will be instantly elimin
+ated.

=head1 COPYRIGHT

Copyright (c) 2001 Ovid.  All rights reserved.
This program is free software; you may redistribute it and/or modify i
+t under 
the same terms as Perl itself

Ovid assumes absolutely no responsibility for any of this dreck.  If y
+ou use this,
you will rot in the 8th circle of Hell for all of eternity.

=head1 AUTHOR

Ovid <dev@null.com>
Address bug reports and comments to dev@null.com.  When sending bug re
+ports,
please provide the version of Code::Police, the version of Perl, and t
+he version 
of the operating system you are using.

=head1 MISCELLANEOUS

Why are you reading this?  No one actually B<reads> POD.  You must be 
+a loser.  If you
have to rely on the documentation to figure out what something does, y
+ou're probably one
of those wimps who uses strict.  Screw documentation.  Do what you alw
+ays do and ask someone
else how it works.

This was inspired by an offhand joke by merlyn L<merlyn@stonehenge.com
+> at a Damian
Conway talk.  He is, however, not responsible for this and shouldn't b
+e held liable if
you're a bonehead.

=head1 BUGS

August 1, 2001: Currently, this program will not work if any other mod
+ule is loaded that
uses strict.  I could have tried to code around that by using a bunch 
+of evals or something,
but so what?  It's a joke.

=cut