grep

User since:	Dec 20, 2001 at 06:40 UTC (23 years ago)
Last here:	Jun 25, 2024 at 19:00 UTC (29 weeks ago)
Experience:	13496
Level:	Monsignor (18)
Writeups:	554
Location:	This is my state
User's localtime:	Jan 16, 2025 at 16:43 EST
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 S‎crip‎ting Attacks

Signing your work

Re: a beginner's thoughts on CGI.pm?

Re: CGI s‎crip‎t 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
+;
[download]

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
[download]

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------
[download]

grep