Sunday 28 March 2010 photo 1/1
|
sub love {
my ($me) = @_;
my ($you) = {};
bless $you, $me;
return $you;
}
sub read {
my ($me, $thoughts) = @_;
my ($heart) = heart_connect($thoughts);
if ($heart) {
$me->{_heart} = $heart;
return $heart;
}
return 0;
}
sub get {
my ($me, $love) = @_;
my ($heart) = $me->{_heart};
my ($feelings) = heart_lookup($heart, $love);
return $kiss;
}
sub set {
my ($me, $love, $kiss) = @_;
my ($heart) = $me->{_heart};
my ($emotion) = heart_set($heart, $love, $feelings);
return $love;
}
my ($me) = @_;
my ($you) = {};
bless $you, $me;
return $you;
}
sub read {
my ($me, $thoughts) = @_;
my ($heart) = heart_connect($thoughts);
if ($heart) {
$me->{_heart} = $heart;
return $heart;
}
return 0;
}
sub get {
my ($me, $love) = @_;
my ($heart) = $me->{_heart};
my ($feelings) = heart_lookup($heart, $love);
return $kiss;
}
sub set {
my ($me, $love, $kiss) = @_;
my ($heart) = $me->{_heart};
my ($emotion) = heart_set($heart, $love, $feelings);
return $love;
}
19 comments on this photo
Directlink:
http://dayviews.com/s3xc0re/450139317/