NAME
Acme::Free::Advice::Slip - Seek Advice from the Advice Slip API
SYNOPSIS
use Acme::Free::Advice::Slip qw[advice];
say advice( 224 )->{advice};
DESCRIPTION
Acme::Free::Advice::Slip provides wisdom from AdviceSlip.com.
METHODS
These functions may be imported by name or with the :all
tag.
advice( [...] )
my $widsom = advice( ); # Random advice
my $advice = advice( 20 ); # Advice by ID
Seek advice.
You may request specific advice by ID.
Advice is provided as a hash reference containing the following keys:
advice
-
The sage advice you were looking for.
id
-
The advice's ID in case you'd like to request it again in the future.
search( ... )
my @slips = search( 'time' );
Seek topical advice.
Advice is provided as a list of hash references containing the following keys:
advice
-
The sage advice you were looking for.
date
-
The date the wisdom was added to the database. It's in YYYY-MM-DD.
I'm not sure why this isn't also returned when requesting advice by ID but that's how the backend works.
id
-
The advice's ID in case you'd like to request it again in the future.
LICENSE & LEGAL
Copyright (C) Sanko Robinson.
This library is free software; you can redistribute it and/or modify it under the terms found in the Artistic License 2. Other copyrights, terms, and conditions may apply to data transmitted through this module.
AdviceSlip.com is brought to you by Tom Kiss.
AUTHOR
Sanko Robinson <sanko@cpan.org>
...but why?
I'm inflicting this upon the world because oodler577 invited me to help expand Perl's coverage of smaller open APIs. Blame them or join us in the effort.