|
|
|
|
|
|
|
|
|
 Posted: Sun Apr 13, 2008 11:58 pm
Once upon a midnight dreary,
while i pron surfed,
weak and weary,
over many a strange and spurious site of ' hot xxx galore'.
While i clicked my fav'rite bookmark,
suddenly there came a warning,
and my heart was filled with mourning,
mourning for my dear amour,
" 'Tis not possible!",
i muttered,
" give me back my free hardcore!".....
quoth the server, 404.
|
 |
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Mon Apr 14, 2008 2:01 am
Roses are red,
Violets are blue,
All of my base
Are belong to you...
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Mon Apr 14, 2008 11:11 pm
Here is one from the Bible, and because the Bible is sort of like a poem, here we go:
Our Father, who 0wnz heaven, j00 r0ck!
May all 0ur base someday be belong to you!
May j00 0wn earth just like j00 0wn heaven.
Give us this day our warez, mp3z, and pr0n through a phat pipe.
And cut us some slack when we act like n00b lamerz, just as we teach n00bz when they act lame on us.
Please don't give us root access on some poor d00d'z box when we're too pissed off to think about what's right and wrong, and if you could keep the fbi off our backs, we'd appreciate it.
For j00 0wn r00t on all our b0x3s 4ever and ever, 4m3n.
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Tue Apr 15, 2008 6:43 pm
Roses are #FF0000, violets are #0000FF...
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Tue Apr 15, 2008 6:59 pm
A programmer once started to cuss
Because getting to sleep was a fuss
As he lay there in bed
Looping 'round in his head
was: while(!asleep()) sheep++;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Wed Apr 16, 2008 8:15 am
PhaseBurn A programmer once started to cuss Because getting to sleep was a fuss As he lay there in bed Looping 'round in his head was: while(!asleep()) sheep++; Damn that would suck
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Wed Apr 16, 2008 3:21 pm
vendion PhaseBurn A programmer once started to cuss Because getting to sleep was a fuss As he lay there in bed Looping 'round in his head was: while(!asleep()) sheep++; Damn that would suck And look who is the only person that is not posting a poem like the title says. tsk tsk < > ! * ' ' # ^ @ ` $ $ - ! * ' $ _ % * < > # 4 & ) . . / | { ~ ~ SYSTEM HALTED
Translation:
Waka-waka bang splat tick tick hash,
Caret at back-tick dollar dollar dash,
Bang splat tick dollar underscore,
Percent splat waka-waka number four,
Ampersand right-paren dot dot slash,
Verticle-bar curly-bracket tilde tilde CRASH.
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Thu Apr 17, 2008 6:05 pm
I suck at poetry... tis one thing that I was never able to get
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Thu Apr 17, 2008 10:11 pm
you did it again! i never said you had to write it. none of the previous was written by its posters open (HEART, ">for_me")
for ($this-valentines-day; $you and $me; $together++) {
$you = "My special one";
$me = "Your darling";
}
&#xti;me = ($you => $me, $together => "forever")
while ($you = push(@me, @away)) {
foreach (@second) {
die a_bit to my $death;
goto hell;
}
pack $my_bags, @and_leave;
package my_love;
unless(!$i_see_you) {
write YOU_SOON;
}
}
reverse keys &#xti;me;
bless me;
for (last; kill $me;) {
if ($you) {
die;
}
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Posted: Sun Jun 15, 2008 8:12 pm
#!/usr/bin/perl
use warnings;
use strict;
use Tk;
my $mw=tkinit;
$mw->geometry('+300+300')
$mw->fontCreate('big',
-family=>'arial',
-weight=>'bold',
-size=>int(-18*18/14))
my $c=$mw->Canvas(-width=>300,-height=>125,-bg=>'white')->pack;
$c->Pixmap( 'martini', -data => get_one() )
my $t1 = $c->create('text',310,40,
-anchor=>'w',
-font => 'big',
-text=>'My limit is 1 martini')
my $t2 = $c->create('text',310,60,
-anchor=>'w',
-font => 'big',
-text=>'2 at the very most')
my $t3 = $c->create('text',310,80,
-anchor=>'w',
-font => 'big',
-text=>'3 I'm under the table')
my $t4 = $c->create('text',310,100,
-anchor=>'w',
-font => 'big',
-text=>'4 I'm under the host')
my @mover;
$mw->after(500,sub{
$c->createImage(30, 10,
-image => 'martini',
-anchor => 'nw',)
$mover[0] = $mw->repeat(5, sub{
$c->move($t1,-1,0)
my ($bx,$by,$bx1,$by1)= $c->bbox($t1)
if($bx == 20){$mover[0]->cancel}
})})
$mw->after(4500,sub{
$c->createImage(55, 10,
-image => 'martini',
-anchor => 'nw',)
$mover[1] = $mw->repeat(5, sub{
$c->move($t2,-1,0)
my ($bx,$by,$bx1,$by1)= $c->bbox($t2)
if($bx == 20){$mover[1]->cancel}
})})
$mw->after(8500,sub{
$c->createImage(80, 10,
-image => 'martini',
-anchor => 'nw')
$mover[2] = $mw->repeat(5, sub{
$c->move($t3,-1,0)
my ($bx,$by,$bx1,$by1)= $c->bbox($t3)
if($bx == 20){$mover[2]->cancel}
})})
$mw->after(12500,sub{
$c->createImage(105, 10,
-image => 'martini',
-anchor => 'nw')
$mover[3]= $mw->repeat(5, sub{
$c->move($t4,-1,0)
my ($bx,$by,$bx1,$by1)= $c->bbox($t4)
if($bx == 20){$mover[3]->cancel}
})})
MainLoop;
sub get_one{
my $o = qq(/* XPM */
static char * o_xpm[] = {
"24 24 2 1",
" c None",
". c #000000",
" ",
" ",
" .................... ",
" .................. ",
" ................ ",
" .............. ",
" ............ ",
" .......... ",
" ........ ",
" ...... ",
" .... ",
" .. ",
" .. ",
" .. ",
" .. ",
" .. ",
" .. ",
" .. ",
" ............. ",
" ",
" ",
" ",
" ",
" "}
)
return $o;
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Reply
