Help for this page

Select Code to Download

Select or download this

package Acme::Bleach;
our $VERSION = '1.150';
...
open 0, ">$0" or print "Cannot bleach '$0'\n" and exit;
print {0} "${coat}use Acme::Bleach;\n", whiten $pressed.$shirt and exi
+t;
__END__