Implementing Shruggie

This commit is contained in:
epik 2015-09-04 01:11:06 +00:00
parent d246cc1a8a
commit fe0ac8b091

View File

@ -43,9 +43,9 @@ handle remainder => sub {
# Only search was "shruggie" # Only search was "shruggie"
if (!$_) { if (!$_) {
return $returnString, return $returnString,
structured_answer => { structured_answer => {
input => [], input => [],
result => [$returnString] result => [$returnString]
}; };
} }
@ -63,12 +63,12 @@ handle remainder => sub {
my $pickRandomFriend = $arrayOfFriendFacesWithNames[rand @arrayOfFriendFacesWithNames]; my $pickRandomFriend = $arrayOfFriendFacesWithNames[rand @arrayOfFriendFacesWithNames];
#$returnString .= " _____<br>_ " . $pickRandomFriend->{'image'}, $returnString .= " ____ " . $pickRandomFriend->{'image'},
return $returnString, return $returnString,
structured_answer => { structured_answer => {
input => [], input => [],
result => $returnString . " _____ " . $pickRandomFriend->{'image'} result => $returnString
}; };
} elsif ($stringAfterAnd eq "friends") { } elsif ($stringAfterAnd eq "friends") {
my @returnArray = ($returnString); my @returnArray = ($returnString);
@ -78,9 +78,9 @@ handle remainder => sub {
} }
return $returnString, return $returnString,
structured_answer => { structured_answer => {
input => [], input => [],
result => $returnString result => $returnString
}; };
} else { } else {
@ -88,7 +88,14 @@ handle remainder => sub {
foreach my $nameEmojiiPair (@arrayOfFriendFacesWithNames) { foreach my $nameEmojiiPair (@arrayOfFriendFacesWithNames) {
if (lc($nameEmojiiPair->{'name'}) eq $stringAfterAnd) { if (lc($nameEmojiiPair->{'name'}) eq $stringAfterAnd) {
return $returnString . " ______ " . $nameEmojiiPair->{'image'}; $returnString .= " ______ " . $nameEmojiiPair->{'image'};
return $returnString,
structured_answer => {
input => [],
result => $returnString
};
} }
} }