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.