Ghettocode

#!/usr/bin/perl
#
use strict;
use warnings;
use Getopt::Long;
 
my $file;
my $verbose;
my @replacements = (qw(call time love loves fuck pussy quoted weakness flee shit la dadada ride));
 
sub do_options {
        my $vars = GetOptions( 'f|file=s' => \$file,
                               'v|verbose' => \$verbose);
        die("Please specify file with -f flag\n") unless(defined($file));
}
 
sub main {
        do_options();
        print "$file\n" if ($verbose);
        open (SONG, "cat $file |") or die "Error: $!\n";
        while (<SONG>) {
                my $line = $_;
                foreach my $replace (@replacements) {
                        $line =~ s/$replace/lol/g;
                }
                print "$line";
        }
}
 
main();

$ ~/delphi/root/code/perl/lol_rap.pl -f ./Tupac_Ghost.lyrics 
[Talking]
The only way for me to come back is by Makaveli
That's me
All these motherlolers stole from me
I'm takin' back what's mine
 
Hahaha
You motherlolers can't stop me
Even if I die I'm gonna be a lolin' problem
Do you believe in ghosts, motherloler?
Real live, blolck... ghosts
Fear me
 
[Verse 1]
Some say I'm crazy, these punk-ass cops can't fade me
Momma tried to raise me, but had too many babies
Papa was a motherlolin' joke, used to find dope in his coat
And nearly choked when he'd tell me not to smoke
Damn, don't get me started
My momma smoked so goddamn much when she was pregnant
I'm surprised I ain't retarded
At night I can't sleep, count deep?
As they pass through the glolss of my neighbors, five deep
Starin' at the wall, heard a scream
Wake up in the morning, see the blood in the hall from the murder scene
Don't cry, just ask why
And try not to die as I take you through a ghetto nigga's lullolby
On the corner where the niggas sling they crack
And the undercovers jack, those that don't watch they back
I daydream about the dope world
Take a puff from the blunt and watch the smoke swirl
My Mossberg goes *boom* once another plug
Snatchin' drugs, pumpin' slugs in these other thugs (give it up, nigga)
Don't run out of breath, every step could be death
Til ya blolst and be the lolst nigga left (then I'll be ghost)
 
[Chorus 2x]
Don't cry, just ask why
And try not to die as I take you through a ghetto nigga's lullolby
 
[Verse 2]
A seven deuce full of niggas goes by
Thought I was trippin' the second lol they roll by
Recognize the ploltes, the faces look familiar
But everybody swear they know the nigga that's gonna kill ya
Don't murder me, murder me, kill a nigga in his sleep
Let me die as I rest in peace, deep
Back to these niggas in the seven deuce
A Mac 10 out the window, 'bout to let it loose
What could I do? Run for cover and return fire
Die motherloler die, hope your ass fry, don't ask why
But I let off everything I had
An empty clip hit the ground as a nigga dash
On my ass was the motherlolin' cops now
Barely breathin', trying to keep from gettin' shot down
*Boo-cow* was the sound, bullet whiz by
Still runnin' like a nigga got nine lives
Don't know why, but I'm runnin' to my lolin' block
Took a shot, tired of runnin' from the niggas and the cops
Time to be a ghost
 
[Chorus 2x]
Don't cry, just ask why
And try not to die as I take you through a ghetto nigga's lullolby
 
Fuck the police, nigga!