Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

petemar1

by petemar1 (Pilgrim)
on Aug 05, 2000 at 01:23 UTC ( #26274=user: print w/ replies, xml ) Need Help??


#!/usr/bin/perl -Tw

use strict;

my @Monks_met = ( "abaxaba", "easyasy2k", "frag", "petdance", "SparkeyG", );

my @OReilly_Perl_books_I_own = ( "learning", "intermediate", "practices", "testing", "programming", "cookbook", "nutshell", "xml", "sysadmin", "graphics", "spidering", "cs", "regexes", "algorithms", "advanced", "pocket", "regex_pocket", "debugger", );

my @Noteworthy_Perl_URLs = ( "useperl", "cpm", "perldoc", "perlmonk", "monkstats", "cblast35", "cbstats", "apache", "mod_perl", "regex", "effective", "glue", "wiki", "stages", "perl_freak", "perlgeek", "pleac", "perligata", "extreme_perl", "higher_order_perl", "rathman", "kuhn", "List::Cycle", "patterns", );


print <<'END_REMARKS';

-----BEGIN GEEK CODE BLOCK-----
Version: 3.1
GAT d++(--) s-:>+: a!>? C++(++++) USLI*++>++++ P++(+++)>+++ L+(+++)>++++ E----(-)>+++ W++$>+++ N+ o? K? w(+)>++++ !O M(+)>++ V PS(+) PE(-) Y+ PGP(+) t(+) 5- X(++) R@ tv-(++) b+(++) DI-(+++) D+ G(+) e+++>++++ h(+) r>++ y?
------END GEEK CODE BLOCK------

-----BEGIN PERL GEEK CODE BLOCK-----
Version: 0.01
P(++)>++++ c?>+++ P6->++ R>+++ M>++ O>+++ MA-->+++ E-->+++ PU!>++++ BD>+++ C>++ D>+++ S-->+++ X>+++ WP+>+++ MO(+)>++ PP(+++)>++++ n>+++ CO-->- PO!(--) o G! A->++++ OLC+>++ OLCC+>++ OLJ++(+++)>* OLP+>++ OLR+>++ OLCO--- OLS--- OLL+>++ OLA-- Ee----(---) Ev-()>+++ Eon- Eot! Eob Eoa- uL+>+++ uB+ uS+ uH! uo+ w>+ m osA- osBE!
------END PERL GEEK CODE BLOCK------

-----BEGIN PERL STYLE GEEK CODE BLOCK-----
Version: undef
I4 On0 ;0 S,><.><+>**<=><&&><and>++<gt><==> B1 L2 C0 P3 N> R1 Vl(en)c3a1p(s0h0a0)r0d1 Hsw sub-main
------END PERL STYLE GEEK CODE BLOCK------

-----BEGIN JAVA GEEK CODE BLOCK-----
Version: 0.01b
J++>+++$$** Fws+ Epvbd$ Cu+ j+ Il+* Ahit+* X U+>+++* V-(+)
------END JAVA GEEK CODE BLOCK------


The Cheesy Webring! You have the right to free cheese.

previous, next, random, list, next5, prev5, first, last

don't blame me for this idea, it's ar0n's fault!

END_REMARKS


Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (8)
As of 2015-05-22 21:27 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    In my home, the TV remote control is ...









    Results (465 votes), past polls