Perl Poem on Travel


# (C) 2008 by Paul C. Buetow ( 

Travel: time eq localtime;

BEGIN { travel }

do { pack (our $bag, packs) } and goto $bless, our $way;
do { bless [our $long], $way } and goto far_away;

far_away: { is => our $destiny } foreach @personality;
for $the (@souls) { its => our $path };

do { use Memoize } and @remember and not @forget;
do { sub travel { to => stop,off } }; foreach (@location) {};

far_away: { is => our $destiny } foreach @personality;
for $the (@souls) { its => our $path };

do { study and s/eek// for @wisdom };
do { require strict; import { of, tied $power } };  

local $robber, do kill unless tied $power;
no warnings; do { alarm $us };

far_away: { is => our $destiny } foreach @personality;
for $the (@souls) { its => our $path };

END { our $path }; do bless [], our $path if $arrived;
do tell $the => $pupils and do tell $wisdom and ref $destiny;

send $the => $pupils, goto destiny and goto Travel;
tell $the; destiny: foreach (@soul) { };
sleep $long for @ever and exit $live;


This is perl, v5.8.8 built for i386-freebsd-64int

5 reacties »

  1. zoonie Said:

    Tiens, t’is hier echt wel stil geworden op diene blog hier πŸ™‚

  2. rottie Said:

    Sjah.. Zomer hee.

    Geen tijd en/of zin om te bloggen.

    Wacht maar binnen een maandje, dan wordt het hier weer een echt feestje. πŸ˜‰

  3. FRaNKy Said:


    Veeeeeeel eenvoudiger

  4. zement Said:

    We missen jullie!

  5. Paul Said:

    Oh, cool! Someone likes my poem and blogs it πŸ™‚

{ RSS feed for comments on this post} · { TrackBack URI }

Geef een reactie

Vul je gegevens in of klik op een icoon om in te loggen. logo

Je reageert onder je account. Log uit /  Bijwerken )

Google+ photo

Je reageert onder je Google+ account. Log uit /  Bijwerken )


Je reageert onder je Twitter account. Log uit /  Bijwerken )

Facebook foto

Je reageert onder je Facebook account. Log uit /  Bijwerken )


Verbinden met %s

%d bloggers liken dit: