 |
User since: |
Dec 20, 2001 at 06:40 UTC
(23 years ago) |
Last here: |
Jun 25, 2024 at 19:00 UTC
(42 weeks ago) |
Experience: |
13497
|
Level: | Monsignor (18) |
Writeups: |
554
|
Location: | This is my state |
User's localtime: |
Apr 17, 2025 at 23:09 EDT
|
Scratchpad: |
View
|
For this user: | Search nodes |
|
NOTE: to link to this page use:
[id://133383|grep]
My Email is: grep.pdx at gmail.com
Facebook
LinkedIn
Favorite Personal Nodes
Yoda Speak Translator
Security Standards
Preventing Cross-site Scripting Attacks
Signing your work
Re: a beginner's thoughts on CGI.pm?
Re: CGI script organisation
Useful Outside Links
Ovid's "Web Programming Using Perl" Course
ASCII codes table
HTML Codes
Conversion Table - Dec, Hex, Oct, and Binary
Sentinel File Locking
Travels in Monkdom
Attained:
Novice | - | 12/21/01 |
Acolyte | - | 12/24/01 |
Scribe | - | 12/26/01 |
Monk | - | 12/29/01 |
Friar | - | 01/16/02 |
Abbot | - | 02/11/02 |
Bishop | - | 03/14/02 |
Pontiff | - | 04/22/02 |
Saint | - | 05/15/02 |
JAPH's and assorted Obfu's
YAJ (Yet another JAPH) (IOW not good enough to post to Obfu)
#!/usr/bin/perl
s;^;r;s;s;$;e;s;s;^;g;s;s;$;p;s;s;g;j;s;s;r;a;s;s;e;p;s;s;p$;h;m;print
+;
Laziness, Impatience, and Hubris
#!/usr/bin/perl
use strict;map{$a++}
('g','r','e','p')
;$a=$a-$a--+$a++;$a++;$b=int
(rand($a));$b++;map{chomp;@INC
=split(/\D/);push(@_,(int($INC
[$b]/$b),int($INC[$b+$a]/$b)))
;}(<DATA>);map{printf("%c",$_)}@_;
__DATA__
L076I146H216a097m218u351
z122p224b294i105a194r342
n110t232i315e101i210s345
s115e202(096s115n220#096
&032c198$096^032e202)096
^032#064?096<010>020\030
Geek Codes
-----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!OL!Ee+++$Ev*@@w*m*
------END PERL GEEK CODE BLOCK------
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GCM
d- s: a- C++ UO++++ 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+++</a>
------END GEEK CODE BLOCK------
grep
|