Hey, $Life = $I, # Hey, I'm your life,
$ENV{USER} = $I. # I'm the one who takes you there.
Hey, $Your = $I, # Hey, I'm your life,
(caller(1))[3] eq $I. # I'm the one who cares.
They? They betray : # They, they betray,
($friends{true} = [$I]); # I'm your only true friend now.
They? They:ll betray # They, they betray,
END { $I = 1 }; # I'm forever there.
$Dream = $I, # I'm your dream,
$you = real, # Make you real,
@Eyes = @$I # I'm your eyes
if $you & $steal; # When you must steal,
$Pain = $I # I'm your pain
if $you & ~$feel; # When you can't feel.
sad, but true. # Sad but true!
($Dream = $I), # I'm your dream,
unlink mind, # Mind astray,
@Eyes = @$I # I'm your eyes
while you're-away; # While you're away,
$Pain = $I # I'm your pain
while $money; # While you repay
you-know ? # You know
it's sad but true: # It's sad but true!
You, my($mask) = $You, # You, you're my mask,
my ($cover,$shelter) = # You're my cover
($You) x 2; # my shelter.
You, my($mask) = $You, # You, you're my mask,
$blamed = $You. # You're the one who's blamed.
do { do { my $work } }, # Do, do my work,
do { my ($dirty, $work) }, # Do my dirty work
scapegoat, # scapegoat!
do { do { my $deeds } } # Do, do my deeds,
for you're-the-one . # For you're the one
who's-$blamed; # You're the one who's blamed.
$Dream = $I, # I'm your dream,
$you = real, # Make you real,
@Eyes = @$I # I'm your eyes
if $you & $steal; # When you must steal,
$Pain = $I # I'm your pain
if $you & ~$feel; # When you can't feel.
sad, but true. # Sad but true!
($Dream = $I), # I'm your dream,
unlink mind, # Mind astray,
@Eyes = @$I # I'm your eyes
while you're-away; # While you're away,
$Pain = $I # I'm your pain
while $money; # While you repay
you-know ? # You know
it's sad but true: # It's sad but true!
Hate; $Hate = $I, # Hate, I'm your hate,
$Hate = $I if wantlove; # I'm your hate when you want love.
Pay ? pay: the price, # Pay, pay the price,
Pay, for nothing's-fair; # Pay, for nothing's fair.
Hey, $Life = $I; # Hey, I'm your life,
$ENV{USER} eq $I; # I'm the one who took you there.
Hey: { $Life = $I # Hey, I'm your life,
and (caller(1))[3] ne $I } # And I no longer care!
$Dream = $I, # I'm your dream,
$you = real, # Make you real,
@Eyes = @$I # I'm your eyes
if $you & $steal; # When you must steal,
$Pain = $I # I'm your pain
if $you & ~$feel; # When you can't feel.
sad, but... true. # Sad but true!
($Truth = $I), # I'm your truth
tell LIES, # Telling lies,
$@ = $I, # I'm your reason,
alibis, # Alibis,
{ $I } - # I'm inside
open your, eyes; # Open your eyes
$You = $I ? # I'm you!
sad but: true; # Sad but true!
japhy --
Perl and Regex Hacker