January 2002 Archives

#!/usr/bin/perl -w package PRODUCT; require Exporter; use lib '.'; use CONFIG; use ANYDB_HELP; use FREQUENT; use CGI qw(:standard :html3); @ISA = qw(Exporter); @EXPORT = qw( make_add_form write_group_nav write_company_nav write_groups_nav write_companies_nav write_product_index ); use strict; use Carp; my %fields = ( key => 'text', id => 'text', name => 'text', group => 'text', company => 'text', price => 'text', description => 'textarea', image_name => 'image', size => 'text', color => 'text', linkto => 'text', visibility => 'text', ); my @array_fields = qw( key id name group company price description image_name size color linkto visibility ); my $delimiter = ":"; ### Creates a new PRODUCT object and initializes the member fields. sub new { my $class = shift; my ($key, $id, $name, $group, $company, $price, $description, $image_name, $size, $color, $linkto, $visibility) = @_; my $self = {}; bless $self => $class; ### If we only have one argument, assume we have a string ### containing all the field values in $id and unpack it if ( @_ == 1 ) { $self->unpack( $key ); } else { $self->{key} = $key; $self->{id} = $id; $self->{name} = $name;$self->{group} = $group; $self->{company} = $company; $self->{price} = $price; $self->{description} = $description; $self->{image_name} = $image_name; $self->{size} = $size; $self->{color} = $color; $self->{linkto} = $linkto; $self->{visibility} = $visibility;} return $self; } ### Packs the current field values into a colon delimited record ### and returns it sub pack { my ( $self ) = @_; my $record = join($delimiter, $self->{key}, $self->{id},$self->{name}, $self->{group}, $self->{company}, $self->{price}, $self->{description}, $self->{image_name}, $self->{size}, $self->{color}, $self->{linkto}, $self->{visibility}); ### Simple check that fields don't contain any colons #croak "Record field contains ':' delimiter character" # if $record =~ tr/:/:/ != 4; return $record; } ### Unpacks the given string into the member fields sub unpack { my ( $self, $packedString ) = @_; ### Naive split...Assumes no inter-field delimiters my ($key, $id, $name, $group, $company, $price, $description, $image_name, $size, $color, $linkto, $visibility) = split($delimiter, $packedString); $self->{key} = $key; $self->{id} = $id; $self->{name} = $name; $self->{group} = $group; $self->{company} = $company; $self->{price} = $price;$self->{description} = $description; $self->{image_name} = $image_name; $self->{size} = $size; $self->{color} = $color; $self->{linkto} = $linkto; $self->{visibility} = $visibility; } ### Displays the PRODUCT data sub dump_product { my ( $self ) = @_; print "id: $self->{key}\n"; print "id: $self->{id}\n"; print "name: $self->{name} \n"; print "group: $self->{group}\n"; print "company: $self->{company}\n"; print "price: $self->{price}\n"; print "Description: $self->{description}\n"; print "Image Name: $self->{image_name}\n"; print "Size: $self->{size}\n"; print "Color: $self->{color}\n"; print "Linkto: $self->{linkto}\n\n"; print "Visibilty: $self->{visibility}\n\n"; } sub dump_html { my ( $self ) = @_; print "<table><tr><td>label</td><td>value</td></tr>\n"; print "<tr><td>key</td><td> $self->{key}</td></tr>\n"; print "<tr><td>id</td><td> $self->{id}</td></tr>\n"; print "<tr><td>name</td><td> $self->{name}</td></tr> \n"; print "<tr><td>group</td><td> $self->{group}</td></tr>\n"; print "<tr><td>company</td><td> $self->{company}</td></tr>\n"; print "<tr><td>price</td><td> $self->{price}</td></tr>\n"; print "<tr><td>Description</td><td> $self->{description}</td></tr>\n"; print "<tr><td>Image name</td><td> $self->{image_name}</td></tr>\n"; print "<tr><td>Size</td><td> $self->{size}</td></tr>\n"; print "<tr><td>Color</td><td> $self->{color}</td></tr>\n"; print "<tr><td>Linkto</td><td> $self->{linkto}</td></tr>\n"; print "<tr><td>Visibilty</td><td> $self->{visibilty}</td></tr>\n"; print "</table>"; } sub print_admin_index{ my ( $self ) = @_; print <<EOF <tr> <td bgcolor=FFFFFF> <form action=edit.cgi> <input type=hidden name=key value=$self->{key}> <input type=submit value=EDIT> </form> </td> <td bgcolor=FFFFFF>$self->{id}</td> <td bgcolor=FFFFFF>$self->{name}</td> <td bgcolor=FFFFFF>$self->{group}</td> <td bgcolor=FFFFFF>$self->{company}</td> <td bgcolor=FFFFFF>$self->{price}</td> <td bgcolor=FFFFFF>$self->{description}</td> <td bgcolor=FFFFFF>$self->{image_name}</td> <td bgcolor=FFFFFF>$self->{size}</td> <td bgcolor=FFFFFF>$self->{color}</td> <td bgcolor=FFFFFF>$self->{linkto}</td> <td bgcolor=FFFFFF>$self->{visibility}</td> <td bgcolor=FFFFFF> <form action=delete.cgi> <input type=hidden name=key value=$self->{key}> <input type=submit value=DELETE> </form> </td> </tr> EOF ; } sub print_trunc_admin_index{ my ( $self ) = @_; my $description = $self->{description}; my $description_snippet = substr($description, 0, 50); print <<EOF <tr> <td bgcolor=FFFFFF> <form action=edit.cgi> <input type=hidden name=key value=$self->{key}> <input type=submit value=EDIT> </form> </td> <td bgcolor=FFFFFF>$self->{id}</td> <td bgcolor=FFFFFF><a href="$prod_url/$self->{key}.shtml" target=out>$self->{name}</a></td> <!-- <td bgcolor=FFFFFF>$self->{group}</td> <td bgcolor=FFFFFF>$self->{company}</td> --> <td bgcolor=FFFFFF>$self->{price}</td> <td bgcolor=FFFFFF>$description_snippet ...</td> <!-- <td bgcolor=FFFFFF>$self->{image_name}</td> <td bgcolor=FFFFFF>$self->{size}</td> <td bgcolor=FFFFFF>$self->{color}</td> <td bgcolor=FFFFFF>$self->{linkto}</td> --> <td bgcolor=FFFFFF>$self->{visibility}</td> <td bgcolor=FFFFFF> <form action=delete.cgi> <input type=hidden name=key value=$self->{key}> <input type=submit value=DELETE> </form> </td> </tr> EOF ; } sub write_product_index { # yeah yeah, screwing the 00 shit, i'm in a rush, and this works really well my $key; my $value; my $db = "products"; my %DATABASE = open_data($db); my $this_company; my @this_product_list; my @product_pulldown; my $blank_template = get_template($blank_template_path); $blank_template =~ s/\[company\]//g; my $keywords = 'ski clothing snowboard kombi jackets long underwear obermeyer waterproof snow pants clothes suits winter coats sorel boots jacket goggles down helmets kids apparel hats toddler coat snowboarding buy red feather wear suit boot bibs hat sledding parkas crazy companies specialty childrens stores outerwear online north face skiing helly hansen spyder mental snowshoes fleece sleds briko'; my $description = 'Winter, ski and snow apparel and gear for kids and teens. Northface, Spyder, Obermeyer, Helly Hanson, Columbia, Brinko Helmets, Boeri sleds, Smith goggles, Kombi gloves, Turtle fur, Wigwam socks, Mental hats, Sorel boots, Redfeather'; $blank_template =~ s/\[keywords\]/$keywords/g; $blank_template =~ s/\[description\]/$description/g; $blank_template =~ s/\[title\]/Winter jackets, clothing, boots, helmets, goggles. Best gear, best prices./g; $blank_template = <<EOF <base href="$base_url/"> $blank_template EOF ; my ($header, $footer) = split('\[content\]', $blank_template); =pod open(INDEX,">$base_path/index.shtml") or die "$!"; print INDEX $header; print INDEX <<EOF <p>Welcome back to another year of winter fun! You might remember us from last year. Well, we've grown and gotten a new look all to better serve you! Worley's WinterKids catalog offers only the finest in winter apparel and accesories for kids and Teens! We have studied closely the "in" colors and styles for the 2002 to keep your family looking great this winter! Thank you for your continued support throughout the years! We look forward to hearing from you.</p> EOF ; print INDEX '<p><b><i>Same Day Shipping Available!</i></b></p>'; print INDEX '<p><b>Featured Products:</b></p>'; print INDEX "<!--\#exec cgi =\"cgi-local/cart/random_product.cgi\" -->"; print INDEX "<!--\#exec cgi =\"cgi-local/cart/random_product.cgi\" -->"; print INDEX "<!--\#exec cgi =\"cgi-local/cart/random_product.cgi\" -->"; #hidden, shhhh print INDEX '<a href="dh-winter_apparel.htm"><img border="0" src="reports/hiddenimage.gif" width="25" height="25"></a>'; print INDEX $footer; close(INDEX); =cut =pod # $header =~ s/\[keywords\]/boom/g; $header = "$header <div align=center>"; #this'll have all product entries # zooom. my @entire_page; my @companies_in_order = qw( Spyder Obermeyer North_Face Helly_Hanson Columbia Briko_Helmets Boeri_Sleds Smith_Goggles Kombi_Gloves Turtle_Fur Wigwam_Socks Mental_Hats Sorel_Boots Redfeather ); foreach $this_company( @companies_in_order ) { my $pretty_company = $this_company; $pretty_company =~ s/_/ /g; #my $company_table = "<h2>$pretty_company</h2>\n"; my $company_table = <<EOF <!-- <p><img src=$logo_url/$this_company.gif></p> --> <p><b>$pretty_company</b></p> <table border="0" cellpadding="1" cellspacing="0" bgcolor="#000000" width=400> <tr> <td bgcolor=#000000> <table border="0" cellspacing="1" cellpadding=3 width=398 bgcolor=#FFFFFF> <tr> <td><p><b>Name</b></p></td> <td><p><b>Description</b></p></td> <td><p><b>Price</b></p></td> EOF ; my $template = $blank_template; #dynamically make some keywords $template =~ s/\[keywords\]/$Meta_Tags->{$this_company}->{-Keywords}/g; $template =~ s/\[description\]/$Meta_Tags->{$this_company}->{-Description}/g; $template =~ s/\[title\]/$Meta_Tags->{$this_company}->{-Title}/g; my $pretty_company = pretty($this_company); my @keys = sort { $a <=> $b } (keys %DATABASE); foreach $key (@keys) {############################ $value = $DATABASE{$key}; my ($key, $id, $name, $group, $company, $price, $description, $image_name, $size, $color, $linkto, $visibility) = split(':', $value); unless($visibility eq "no") { ################################## if ($company eq $this_company) { ############################### my $description_snippet = substr($description, 0, 75); my $product_row = <<EOF <tr> <td> <p><a href=$prod_url/$key.shtml>$name</a></p> </td> <td> <p>$description_snippet ... <a href=$prod_url/$key.shtml>(more)</a> </td> <td> <p>$price</p> </td> </tr> EOF ; #push(@this_product_list, $product_row); #push(@product_pulldown, "<option value=$key.shtml>$name</option>"); $company_table .= "\n$product_row\n"; }#### }### # } ### # no more $company_table .= "</table></td></tr></table>"; # no more push(@entire_page, $company_table); $company_table = ""; } $footer =~ s/<\/body>/$secret_image<\/body>/; open(INDEX,">$base_path/index.shtml") or die "$!"; print INDEX "$header\n"; foreach(@entire_page){ ################# print INDEX "$_\n"; }### print INDEX "</div>\n\n$footer"; close(INDEX); =cut } sub write_group_nav { @groups = sort(@groups); open(SSI, ">$include_path/group_nav.shtml"); print SSI "<hr><p><b>Groups:</b><br>"; foreach(@groups){ print SSI "<a href=$_.shtml>$_</a><br>"; } print SSI "</p><hr>"; close(SSI); } sub write_company_nav { @companies = sort(@companies); open(SSI, ">$include_path/company_nav.shtml"); print SSI "<hr><p><b>Companies:</b><br>"; foreach(@companies){ print SSI "<a href=$_.shtml>$_</a><br>"; } print SSI "</p><hr>"; close(SSI); } sub write_static_pages { my ( $self ) = @_; #only write the pages out if we're supposed to if ($self->{visibility} eq "yes"){ my $key = $self->{key}; ############################################################ # make the "add theis product to yoru cart" code my $color_list = $self->{color}; my @colors = split(',',$color_list); my $size_list = $self->{size}; my @sizes = split(',', $size_list); my @amount = (1..100); my $i; my $add_form_code = <<EOF <center> <form action="$cart_cgi_url/add_product.cgi" method=POST> <input type=hidden name=key value=[key]> <table style="border: 1px solid #CCCCCC" cellpadding=5> <tr> <td><p><b>Purchase</b> $self->{name} <br> <b>Price:</b> \$$self->{price}</p> </td> </tr> <tr> <td><p>Available Sizes:</p></td></tr> <tr> <td><p> EOF ; $add_form_code .= "<select name=size>"; for($i=0;$i<=$#sizes;$i++){$add_form_code.= "<option value=$i>$sizes[$i]</option>\n"; } $add_form_code .= "</select>"; $i=0; $add_form_code .= "</p></td></tr><tr><td><p>Available Colors</p></td></tr><tr><td><p>"; $add_form_code .= "<select name=color>"; for($i=0;$i<=$#colors;$i++){$add_form_code .= "<option value=$i>$colors[$i]</option>\n"; } $add_form_code .= "</select>"; $i=0; $add_form_code .= "</p></td></tr><tr><td><p>Amount:</p></td></tr><tr><td><p>"; $add_form_code .= popup_menu('quantity', [@amount]); $add_form_code .= "</p></td></tr><tr><td><input type=submit value=\" Add to Shopping Cart \" style='font-size: 15px; font-family:arial,verdana, sans-serif; background-color: #99CC99; color: #000000; font-weight:bold'></td></tr></table></form> "; ####################################################### #get a fresh template copy my $template = get_template($template_path); # pretty the company name up my $company = $self->{company}; my $pretty_company = pretty($company); #make a bread crumb trail on the top my $bread_crumb = "<font face=arial size=2><a href=$base_url>$website_name</a> :: <a href=$prod_url/$company.shtml>$pretty_company</a> :: $self->{name}</font>"; $template =~ s/\[bread_crumbs\]/$bread_crumb/g; #put a <base href> tag at the top of the template so this template is abit more flexibel $template = <<EOF <base href="$base_url/"> $template EOF ; my $this_group = $self->{group}; my $pretty_group = pretty($this_group); #meta keywords my $keywords = "$self->{name}, $pretty_group, $pretty_company, Winter Clothes for Teens and Kids, warm clothes, ski clothes, snowboard clothes"; #dynamically make some keywords $template =~ s/\[keywords\]/$Meta_Tags->{$company}->{-Keywords}/g; $template =~ s/\[description\]/$Meta_Tags->{$company}->{-Description}/g; $template =~ s/\[title\]/$self->{name} by $pretty_company/g; #put the group menu on my $group_ssi_code ="<!--\#include virtual =\"includes/${this_group}_pd.shtml\" -->"; $template =~ s/\[group_menu\]/$group_ssi_code/g; #put the company menu on my $this_company = $self->{company}; my $company_ssi_code ="<!--\#include virtual =\"includes/${this_company}_pd.shtml\" -->"; $template =~ s/\[company_menu\]/$company_ssi_code/g; $template =~ s/\[add_form\]/$add_form_code/g; #add the quick cart summary code my $quick_cart_summary = "<!--\#exec cgi =\"cgi-local/cart/quick_cart_summary.cgi\" -->"; $template =~ s/\[quick_cart_summary\]/$quick_cart_summary/g; #and the rest my $img = $self->{image_name}; my $image_code = "<img src=$img_url/$img>"; $template =~ s/\[image_name\]/$image_code/g; $template =~ s/\[group\]/$pretty_group/g; $template =~ s/\[company\]/$pretty_company/g; $template =~ s/\[name\]/$self->{name}/g; $template =~ s/\[price\]/$self->{price}/g; $template =~ s/\[product_description\]/$self->{description}/g; $template =~ s/\[key\]/$self->{key}/g; $template =~ s/\[visibility\]/$self->{visibility}/g; $template =~ s/\[size\]/$self->{size}/g; $template =~ s/\[color\]/$self->{color}/g; $template =~ s/\[id\]/$self->{id}/g; $template =~ s/\[key\]/$self->{key}/g; #open the file and prrrrrint open(FILE, ">$prod_path/$key.shtml") or die "wtf? : $!"; print FILE $template; close(FILE); } } sub write_groups_nav { # yeah yeah, screwing the 00 shit, i'm in a rush, and this works really well my $key; my $value; my $db = "products"; my %DATABASE = open_data($db); my $this_group; foreach $this_group(@groups) { my @this_product_list = (); my @product_pd = (); my $pretty_group = pretty($this_group); my @keys = sort { $a <=> $b } (keys %DATABASE); foreach $key (@keys) {############################ $value = $DATABASE{$key}; # # do something with $key, $value #my ($section, $subsection, $the_quote, $author, $contrib_name, $contrib_address, $status) = # #split(/$delimiter/, $value); my ($key, $id, $name, $group, $company, $price, $description, $image_name, $size, $color, $linkto, $visibility) = split(':', $value); unless($visibility eq "no") { ################################## if ($group eq $this_group) { ############################### push(@this_product_list, "<!-- number $key -->\n<a href=$prod_url/$key.shtml>$name</a><br>"); push(@product_pd, "<option value=$key.shtml>$name</option>"); }#### }### # # } ### open(GROUP,">$prod_path/$this_group.shtml"); foreach(@this_product_list){ ################# print GROUP "$_\n"; }### close(GROUP); open(GROUP_PD,">$include_path/${this_group}_pd.shtml"); print GROUP_PD <<EOF <form name=group_form> <p><font face=arial>Also in $pretty_group<br> <select name=page> EOF ; foreach(@product_pd){ ################# print GROUP_PD "$_\n"; }### print GROUP_PD "</select><input type=button value=go onclick=go_group();></font></p></form>"; close(GROUP_PD); @this_product_list = (); @product_pd = (); } } sub write_companies_nav { # yeah yeah, screwing the 00 shit, i'm in a rush, and this works really well my $key; my $value; my $db = "products"; my %DATABASE = open_data($db); my $this_company; my @this_product_list; my @product_pulldown; my $blank_template = get_template($blank_template_path); $blank_template = <<EOF <base href="$base_url/"> $blank_template <center> EOF ; foreach $this_company(@companies) { my $template = $blank_template; my $pretty_company = pretty($this_company); my @keys = sort { $a <=> $b } (keys %DATABASE); my $prod_table = '<table cellpadding=5>'; $value = $DATABASE{$key}; my ($key, $id, $name, $group, $company, $price, $description, $image_name, $size, $color, $linkto, $visibility) = split(':', $value); unless($visibility eq "no") { if ($company eq $this_company) { # my $pretty_company = pretty($company); $template =~ s/\[company\]/$pretty_company/g; } } } =pod foreach $this_company(@companies) { my $template = $blank_template; foreach $key (@keys) {############################ # # do something with $key, $value #my ($section, $subsection, $the_quote, $author, $contrib_name, $contrib_address, $status) = # #split(/$delimiter/, $value); my ($key, $id, $name, $group, $company, $price, $description, $image_name, $size, $color, $linkto, $visibility) = split(':', $value); unless($visibility eq "no") { ################################## if ($company eq $this_company) { ############################### my $pretty_company = pretty($company); $template =~ s/\[company\]/$pretty_company/g; my $description_snippet = substr($description, 0, 50); my $product_row = <<EOF <tr> <td> <p><a href=$prod_url/$key.shtml>$name</a></p> </td> <td> <p>$description_snippet ... <a href=$prod_url/$key.shtml>(more)</a> </td> <td> <p>$price</p> </td> </tr> EOF ; push(@this_product_list, $product_row); push(@product_pulldown, "<option value=$key.shtml>$name</option>"); }#### }### # # } ### open(COMPANY,">$prod_path/$this_company.shtml"); my ($header, $footer) = split('\[content\]', $template); $header =~ s/\[keywords\]/$Meta_Tags->{$this_company}->{-Keywords}/g; $header =~ s/\[description\]/$Meta_Tags->{$this_company}->{-Description}/g; $header =~ s/\[title\]/$Meta_Tags->{$this_company}->{-Title}/g; print COMPANY $header; print COMPANY "<p><font face=arial size=2><a href=$base_url>$website_name</a> :: $pretty_company</p>"; print COMPANY <<EOF <p><center><img src=$logo_url/$this_company.gif></center></p> <center> <table border="0" cellpadding="1" cellspacing="0" bgcolor="#000000" width=400> <tr> <td bgcolor=#000000> <table border="0" cellspacing="1" cellpadding=3 width=398 bgcolor=#FFFFFF> <tr> <td><p><b>Name</b></p></td> <td><p><b>Description</b></p></td> <td><p><b>Price</b></p></td> EOF ; foreach(@this_product_list){ ################# print COMPANY "$_\n"; }### print COMPANY "</table></td></tr></table></center>"; print COMPANY '<hr width=66% size=1 color=black>'; print COMPANY "<p><b>Featured Product by $pretty_company</b></p>"; print COMPANY "<!--\#include virtual =\"cgi-local/cart/random_product.cgi?company=$this_company\" -->"; print COMPANY "</center>\n$footer"; close(COMPANY); open(COMPANY_PD,">$include_path/${this_company}_pd.shtml"); print COMPANY_PD <<EOF <form name=company_form> <p><font face=arial>Also from $pretty_company<br> <select name=page> EOF ; foreach(@product_pulldown){ ################# print COMPANY_PD "$_\n"; }### print COMPANY_PD "</select><input type=button value=go onclick=go_company();></font></p></form>"; close(COMPANY_PD); @this_product_list = (); @product_pulldown = (); } =cut } sub make_add_form { print "<p><b>Add a product to the database</b></p>\n"; print "<form>\n"; foreach(@array_fields) { my $field = $fields{$_}; print "<p>$_<br>\n"; print "<input type=\"text\" name=\"$_\">" if ($field eq "text"); print "<textarea name=\"$_\" cols=40 rows=5></textarea>\n"if ($field eq "textarea"); } print "<p><input type=submit value=\"Add Product\">\n"; print "</form>\n"; } 1;

all the songs are talking directly to me,

the songs are seem to be filed with grief

but all the songs are different.

I,I,I,I,I,

u,u,u,u

how did the giving tree give only itself to those want everything but

but when I said those words I wish they weren't true for all the bad reasons

what is this i say when i lay by you? what did you say back and what did you

say to my joke?

confusion in confusing the facts

maybe i should do this

this I should do, but no.

No one would know where that all was

all eye Allah Moses seraphine Boticelli artwork paintings, two headed dogs with collars of apples and cinnamin sticks that keeps sleeping on my bed leaving amazing amounts of hair that i cannot clean up because of their tendency to stick to only things of mine that i should want to stay clean, it's a losing battle for me until i erase the dog with turbentine and eat of the apples and dance around with my gun that shoots stars out of the sky like pixie fairies in new age old time self help book corner stores that haven't been invented, since the physics haven't been invented since the time hasn't come where cows will not just say moo but also say cluck, and the chicken will fly, but only in the state of alabama, to the island of bermuda to lay their eggs and die since the cannot fly so they will die, amongs the pink sand and tropical trees and nothing but water for a thousand miles in every direction except down and up to the clouds where transatlantic follows of Buddha fly to cities with Big Ben's and Effel Towers and great marble like collesiums made of ordinary asphalt, more widley known as concrete, mostly used now for the bottom of buildings so as the building can be erected high high high into the clouds and tip over people and animals that jump too far for god to see and realize that the clouds are just little smudges and mistakes of people that I have never met but made love to like little sybles that laugh and drink of the whine and razzberries are growing out of sewer drains which i lose my baseballs through and look down and wonder where they go so we follow them until they go where they go and we climb in and think there are monsters all over the sewers and we scream and laugh and live with the ideas in our heads that we are monsters going through sewer pipes and into or out of our homes and we go and play on the docks of my hometown where i'll later drink of bad beer and piss and skate the entire rest of the night backwards cause that's how we all are anyways until we look with a slight tilt of our heads and interest in our eyes and everything will be fine except everything will be fine, but people will be mighty funny walking around and I saying "look at all these people, they must be thinking of intelligent life on outer space and how good cherry pies are; even in those greasy snack kinds they have $1.00 for six but they taste so good and someone just called me and i'm calling them and they don't know why but she called at the same clock as the alamrm clock on my desk that's two hours off and I don't know why and that looks suspicious, like dolphines that coast by veasles at sea for no other reason than fun and that's what we all should do, less the boat since we need no guide to where we go, we know better than any damn ship made by the hands of mortals and spit upon by the mouths of god's spitting image and we all look and see that we are only ten fingers and ten toes that are the farthest away from anything else, that have the same digits but have drastically different jobs unless you know (like me) how to walk on your hands and spin around on your hands and show up ballarena gymnastic dancers that should know how to do my hand walking but instead work on various fancy turns that look good to an audience that doesn't know the other side and they are too far away to care or understand but clap when appropriate and leave me with forty dollars without since I got the expensive seats to get as close as I can, but that is apparently, not as close as it should be cause i can't see what I'm seeing as what is saying to me nothing but little ends of stories that I should know since I've read the book and seen the movie and played the video game, but I never said hello tp the original author who is behind a black wall thousands of miles high and a hundred thick and busy schedules and people to feed and fuck and clothe - but all I want to do is say hello them, tell them things about their stories that i really like - like really, I don't think they never heard of all this before which makes this space of no wall so much higher and so much deeper like chocolate easter egg baskets in april, which was also your birthday when you still had those two and you knew nothing of hate and lies and of secrets of your family, but you wanted to play with your toy cars and start fights with your best friends and eat lots of grasshopper cookies until you got fat and languid and you played the video game and watched the video but reading a book sounded as skrewy as trying to make a chicken fly to alaska where fish go to spawn and die cause they cannot swim back like other fish that swim much better or don't think of swimming upstream or outside of swimming pools at all but in the safety of blown up teddy bars with rocks in their stuffing or just rocks, no stuffing and this really was to hurt anyone who wanted to squeeze so you don't squeeze but the rocks are very hansome when they're rocks in a stuffed animal like the one on my mind as i think of nothing but parts of my mind that fire and trigger and misfire like all the mistakes i've made in soccer practice and the way i never was able to score that goal until the last game but what was the point, there was no point to this all when the ball is deflated and I have a bruised knee and can't be in track and field cause my coach needs heart surgery from taking too much drugs and butter and spilling out so much shit in his english that he will get kicked out of the school even while well within is tenure but age only makes us travel slower and with less control; like 16 month old paternal nieces that look almost the same now but they won't be able to date the same guy at one time like that episode i watched of my life if i was a paternal twin dating what I think is Alysyn but us really Amanda when we go got hot fudge sundaes with so many strawberries on them to bec alled strawberry sundaes with hot fudge but they said they didn't have enough room on their menu for that so they make due with what they but it would only take a little bit of work to make it fireworks that are frozen and have chocolate chips in every conceivable flavors, not just chocolate chips but chips of hope and value and these will be mixed in like chocolate chips but more like marijuana; the cake won't taste as good but it'll be good in a few hours if the happy man across the street would say hello to me one more time, I have his number and he's having trouble with his computer but I need to see what there is when I crack the china vase that holds nothing but something ha!

This entry is dedicated to Ms. Carroll, a fan of my hackneyed, coffee fueled bop and to normal everyday life; which should always seem like an adventure.