Implementing Shruggie
This commit is contained in:
parent
d246cc1a8a
commit
fe0ac8b091
@ -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
|
||||||
|
};
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user