Tribute To Weezer: Thank God For Half-Japanese Girls

It's thanksgiving, and I have to thank god for those half-japanese girls...

#!/usr/bin/perl


# goddamn you half japanese girls 
# do it to me every time 
# oh, the redhead said you shred the cello 
# and i'm jello, baby 
# 'cause you wont talk won't look won't think of me 
# i'm the epitome 
# a public enemy 
# why you wanna go and do me like that? 
# come down on the street and dance with me 

# ...

# i wish i could get my head outta the sand 
# 'cause i think we'd make a good team 
# and you would keep my fingernails clean 
# but that's just a stupid dream that i won't realize 
# 'cause i can't even look in your eyes without shakin' 
# and i ain't fakin' 
# i'll bring home the turkey and you bring home the bacon
[download]

GOD->can( DAMN ), 1/2 * Japanese::Girls ;
for ( each %{time()} ) {
    do { 'it', @{ME} };
    OH, and REDHEAD;
} continue { to : say($you,$shred, @Chello) };

baby, and ME->isa( "jello") ;

@ME,
eval '
    no You::talk;    
    no You::look;
    no You::think;
';

ME->isa('epitome'), a::public::enemy;
seek(REASON,do { ME },'like that' );

do { not wait() }, come * down * on * street & dance => me
..
I , Wish. I->can( my $head = do { GET : { out , of, sand  } } );
eval { cos, I , Think. WE->can( MAKE->VERSION($of,$a,$good,$team) ) }
and
select my %fingernails;
$fingernails{'you','keep'..'clean'};

if ( I->can( $not/do { Look-into-your-eyes; even, time(); 1; } ) ) {
    $@ = 'stupid dream that', not REALIZE 
    and I, AINT, FAIKIN;
}
BUT: { 
I->can( bring_home_the_turkey ) 
and
YOU->can( bring_home_the_bacon );
}
[download]

Gyan Kapur
gyan.kapur@rhhllp.com

Comment on Tribute To Weezer: Thank God For Half-Japanese Girls Select or Download Code

Replies are listed 'Best First'.
My Name is Jonas by fredopalus (Friar) on Dec 01, 2002 at 18:48 UTC
A little sloppy, but... `%my = ( name => "Jonas", i_am => { carrying => "wheel", } ); THANKS: for ($all eq "you've shown us";) { } this->is_how( we_feel ); %come = ( sit => "next to me", pour => ["yourself", "some", {$tea => "just like grandma mad +e"} ], when => { we => "couldn't find sleep", } ); things->were( better_then ); while ($once ne 'ever') { print "again"; } we->have( all_left_the_den ); %let = ( me => "tell", you => "bout it", );` [download]	[reply] [d/l]
Re: Re: Tribute To Weezer: Thank God For Half-Japanese Girls by submersible_toaster (Chaplain) on Dec 03, 2002 at 01:38 UTC
++fredopalus , I had almost forgotten the words, anyone game to try the sweater song? `if ( $I <=> "Don't Want" ) { DESTROY( $sweater ) }` [download]	[reply] [d/l]
Re: Tribute To Weezer: Thank God For Half-Japanese Girls by LTjake (Prior) on Nov 29, 2002 at 12:36 UTC
++. Great song (El Scorcho) (...and album!), great band, great tribute. This line made me crack up: `baby, and ME->isa( "jello") ;` [download] -- Rock is dead. Long live paper and scissors!	[reply] [d/l]
In the Garage by fredopalus (Friar) on Dec 03, 2002 at 03:45 UTC
# In the Garage @i_ve_got = ("Dungeon Master's Guide", "a 12-sided die", "Kitty Pryde" +); $and = "Nightcrawler"; print "too"; waiting->there( for_me ); @yes = ("i_do", "i_do"); %i_ve_got = ( posters_on => "wall", favorite_rock_group_kiss => ["Ace Frehley", "Peter Cri +ss"], ); waiting->there( for_me ); @yes = ("i_do", "i_do"); in->garage( i_feel_safe ); no_one->cares( about_my_ways ); IN_THE_GARAGE: { where->i( belong ); no_one_hears->me( sing ); print "this song"; } in->garage (); %i = ( have => "electric guitar", play => "my stupid songs", write => "these stupid words", and_i_love => "everyone", ); waiting->there( for_me ); @yes = ("i_do", "i_do"); [download]	[reply] [d/l]
Re: Tribute To Weezer: Thank God For Half-Japanese Girls by batkins (Chaplain) on Dec 11, 2002 at 20:01 UTC
good stuff. i had meant to try my hand at the Sweater Song, but the result was so bad that I couldn't bring myself to post it. :)	[reply]


"be consistent"
	PerlMonks