For U2 fans. This one definately won't compile, and I took some liberties with $_. Improvements welcome.

use Band::U2;

## Who is this person they sing of?

undef($_);

# See the stone set in your eyes

@{ $_ } = map('stone', @{ $_->{"eyes"} }); 

# See the thorn twist in your side

push @{ $_ }, "thorn"; 

# I wait for you

sleep unless $_;

# Slieght of hand and twist of fate

$hand->slieght($self) && $fate->twist($self);

# On a bed of nails she makes me wait

if ($_) { bed($self, 'nails') && sleep; }

# And I wait without you

sleep && undef($_);

# With or without you x2
# I can't live
# With or without you

undef ($self->{"live"}) if ( $_ || !$_ );

# Through the storm we reach the shore

@shore = storm($self, $_);

# You give it all but I want more

while ($self->{"want"} > $_) { ($_)--; }

# And I'm wating for you

sleep unless $_;

# With or without you x2
# I can't live
# With or without you

undef ($self->("live")) if ( $_ || !$_ );


# And you give yourself away x2
# And you give x2
# And you give yourself away

while ($_ > 0) { ($_)--; }

# My hands are tied
# My body bruised, she's got me with
# Nothing to win 
# And nothing left to lose

tied $self->("hands");
bruised($self->("body")); 

if ($_) { undef($self->{"win"}) && undef($self->{"lose"}); }

# And you give yourself away x2
# And you give x2
# And you give yourself away

while ($_ > 0) { ($_)--; }

# With or without you x2
# I can't live
# With or without you

undef ($self->("live")) if ( $_ || !$_ );

## This part was only in their live version of the song
## I took "we'll" to mean "all people".

# And we'll shine like stars in the summer night
# We'll shine like stars in the winter night
# One heart
# One hope
# One love

foreach $person (@all) { 
    shine('Winter Night', $person);
    shine('Summer Night', $person):
}

$heart = join(' ', @all)
$hope  = join(' ', @all)
$love  = join(' ', @all)


# With or without you x2
# I can't live
# With or without you

undef ($self->("live")) if ( $_ || !$_ );
[download]

<-> In general, we find that those who disparage a given operating system, language, or philosophy have never had to use it in practice. <->