The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

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.