[FWP] Down right dirty perl

[Jasvir Nagra <jas@cs.auckland.ac.nz>]

#! /usr/bin/perl

                                          $==$'; 
                                         $;||$.| $|;$_
             ='*$ (                  ^@(%_+&~~;# ~~/.~~
         ;_);;.);;#)               ;~~~~;_,.~~,.* +,./|~
    ~;_);@-,  .;.); ~             ~,./@@-__);@-);~~,.*+,.
  /|);;;~~@-~~~~;;(),.           ;.,./@,./@,.;_~~@-););,.
  ;_);~~,./@,.;;;./@,./        |~~~~;#-(@-__@-__&$#%^';$__
   ='`'&'&';$___="````"  |"$[`$["|'`%",';$~=("$___$__-$[``$__"|
              "$___"|       ("$___$__-$[.%")).("'`"|"'$["|"'#").
        '/.*?&([^&]*)&.*/$'.++$=.("/``"|"/$[`"|"/#'").(";`/[\\`\\`$__]//`;"
        |";$[/[\\$[\\`$__]//`;"|";#/[\\\$\\.$__]//'").'@:=("@-","/.",
       "~~",";#",";;",";.",",.",");","()","*+","__","-(","/@",".%","/|",
        ";_");@:{@:}=$%..$#:;'.('`'|"$["|'#')."/(..)(..)/".("```"|"``$["|
        '#("').'(($:{$'.$=.'}<<'.(++$=+$=).')|($:{$'.$=.'}))/'.("```;"|
        "``$[;"|"%'#;").("````'$__"|"%$[``"|"%&!,").${$[};`$~$__>&$=`;$_=
       '*$(^@(%_+&@-__~~;#~~@-;.;;,.(),./.,./|,.-();;#~~@-);;;,.;_~~@-,./.,
        ./@,./@~~@-);;;,.(),.;.~~@-,.,.,.;_,./@,.-();;#~~@-,.;_,./|~~@-,.
          ,.);););@-@-__~~;#~~@-,.,.,.;_);~~~~@-);;;,.(),.*+);;# ~~@-,
           ./|,.*+,.,.);;;);*+~~@-,.*+,.;;,.;.,./.~~@-,.,.,.;_)   ;~~~
             ~@-,.;;,.;.,./@,./.);*+,.;.,.;;@-__~~;#~~@-,.;;,.*   +);;
               #);@-,./@,./.);*+~~@-~~.%~~.%~~@-;;__,. /.);;#@-   __@-
                 __   ~~;;);/@;#.%;#/.;#-(@-__~~;;;.;_ ;#.%~~~~  ;;()
                      ,.;.,./@,.  /@,.;_~~@- ););,.;_   );~~,./  @,.
                      ;;;./@,./|  ~~~~;#-(@- __,.,.,.    ;_);~~~ ~@
                       -~~());;   #);@-,./@,  .*+);;;     ~~@-~~
                       );~~);~~  *+~~@-);-(   ~~@-@-_      _~~@-
                       ~~@-);;   #,./@,.;.,    .;.);@      -~~@-;
                       #/.;#-(   ~~@-@-__      ~~@-~~       @-);@
                       -);~~,    .*+,./       |);;;~        ~@-~~
                        ;;;.;     _~~@-@     -__);.         %;#-(
                        @-__@      -__~~;#  ~~@-;;          ;#,.
                        ;_,..         %);@-,./@,            .*+,
                        ..%,           .;.,./|)             ;;;)
                        ;;#~            ~@-,.*+,.           ,.~~
                       @-);            *+,.;_);;.~         ~););
                      ~~,.;         .~~@-);~~,.;.,         ./.,.;
                      ;,.*+        ,./|,.);  ~~@-         );;;,.(
                    ),.*+);                              ;#~~/|@-
                  __~~;#~~                                $';$;;


__END__

Step right up folks - step right up and see the freaky camel - that's
right, no alphanumerics folks, not even a "use" line.  And to help you
ensure job security and express you creative art in your own creations
at work, free of annoying letters and numbers, here's Smirch, now at a
CPAN near you.

Its still pretty flimsy and for the moment, this puppy is Unix
only. =( 

Be gentle.

Cheers
Jas

==============================================================================
                      Release of version 0.90 of Smirch
==============================================================================

NAME
    Smirch - For *really* dirty programs

SYNOPSIS
            use Smirch;

            Smirch::smear("tooClean.pl");

DESCRIPTION
    If you have not yet seen the most clever Bleach.pm by Damian Conway, go
    see that now. The only trouble with showing off Bleach to your friends
    is that it requires Bleach to be installed on their machines. So here is
    Smirch, that does the converse of Bleach - rewrites your program using
    only non alphanumeric characters BUT it does not depend on any external
    module! That's right - complete perl without numbers or letters.

    After you have Smirched a program, the program continues to work as
    before except now it is absolutely unreadable as the module removes all
    *sightly* characters from your source file.

INSTALLATION

    It's all pure Perl, so just put the .pm file in its appropriate
    local Perl subdirectory.

TODO
    Smirch currently spits out perl in one line - it would be nice to have
    it reform the code automatically into pretty pictures like the above
    camel.

BUGS
    Smirch does not work with windows (yet?). Also, smirched programs are a
    little flakey and sadness happens when used with Bleach or anything too
    strenuous. Use is unadvisable for anything important.

AUTHOR
    Jasvir Nagra

COPYRIGHT
       Copyright (c) 2001, Jasvir Nagra. All Rights Reserved.
     This module is free software. It may be used, redistributed
    and/or modified under the terms of the Perl Artistic License
         (see http://www.perl.com/perl/misc/Artistic.html)

==============================================================================

AVAILABILITY

Smirch has been uploaded to the CPAN
and is also available from:

	http://www.cs.auckland.ac.nz/~jas/CPAN/Smirch.tar.gz

==============================================================================



==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe