blob: b335ae17f9c9392a4709807c9074c7681deb84c6 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
#!/usr/bin/env perl
use strict;
use warnings;
# PODNAME: pocket
# ABSTRACT: interact with the Pocket API from the command line
=head1 SYNOPSIS
$ pocket list
Enter your consumer key: ...
Visit https://getpocket.com/auth/authorize?request_token=...&redirect_uri=https://getpocket.com/ and log in. When you're done, press enter to continue.
http://the-toast.net/2015/04/27/looking-back-fragments-from-womens-shelters-1981-1996/view-all/
https://modelviewculture.com/pieces/dreaming-holding-onto-the-hope-of-justice-in-technology-and-america
[...]
$ pocket words --archive
2233913
=head1 DESCRIPTION
This program provides several subcommands to allow you to interact with your
Pocket list from the command line. It will automatically authenticate as
needed, prompting you for your consumer key, and will store the returned
credentials in C<~/.pocket>.
=head1 COMMANDS
=head2 authenticate
Authenticates you with the Pocket API and does nothing else. Not usually
necessary, since all of the following commands will automatically authenticate
as necessary.
=head2 list
Prints the URLs in your list. By default, prints unread URLs, but also takes options to adjust the list that is returned:
=over 4
=item --unread
Return only unread links. This is the default, but can be provided for
explicitness.
=item --archive
Return only archived links.
=item --all
Return both unread and archived links.
=item --tag=<tag>
Return links with the given tag. This option can be passed multiple times, and
may be combined with the above options.
=back
=head2 words
Takes the same options as C<list>, but instead of printing the URLs of the
articles, prints the number of words in all of those articles combined.
=head2 search <string>
Returns a list of URLs whose title or URL contains C<string>. Takes the same
options as C<list> to limit the search.
=head2 favorites
Returns a list of favorited URLs. Takes the same options as C<list>.
=head2 add <url> [title]
Adds C<url> to your list, optionally with the given C<title>.
=head2 archive <url>
Moves C<url> from your list to your archive.
=head2 readd <url>
Moves C<url> from your archive to your list.
=head2 favorite <url>
Marks C<url> as a favorite.
=head2 unfavorite <url>
Unmarks C<url> as a favorite.
=head2 delete <url>
Deletes C<url> from your list and/or archive entirely.
=cut
use WWW::Pocket::Script;
WWW::Pocket::Script->new->run(@ARGV);
|
