#!/usr/bin/perl -w
use strict;

my @reality;
	sub everyday(
	sub it {print join chr(47),qw(
  		weakness mind
	))};
if($pain and $hate) { 
   sub takeover{$thoughts/2}; 
};

if($you)
	sub (can and &do){$any or $better};
live and &make 
	sub($love, $hapiness) 
	and {
		wait($you) 
		sub( you{$turn})};

#-----------------------------------------
#In my reality,
#everyday
#weakness goes across
#my mind
#pain and hate
#takesover my thoughts
#if you can do any better
#live and make love and hapiness
#and wait for your turn
#-----------------------------------------
#StachU