NAME
ojo - Fun oneliners with Mojo!
SYNOPSIS
$ perl -Mojo -E 'say g("mojolicio.us")->dom->at("title")->text'
DESCRIPTION
A collection of automatically exported functions for fun Perl oneliners. Ten redirects will be followed by default, you can change this behavior with the MOJO_MAX_REDIRECTS environment variable.
$ MOJO_MAX_REDIRECTS=0 perl -Mojo -E 'say g("mojolicio.us")->code'
Proxy detection is enabled by default, but you can disable it with the MOJO_PROXY environment variable.
$ MOJO_PROXY=0 perl -Mojo -E 'say g("mojolicio.us")->body'
FUNCTIONS
ojo implements the following functions.
a
my $app = a('/hello' => sub { shift->render(json => {hello => 'world'}) });
Create a route with "any" in Mojolicious::Lite and return the current Mojolicious::Lite object. See also the Mojolicious::Lite tutorial for more argument variations.
$ perl -Mojo -E 'a("/hello" => {text => "Hello Mojo!"})->start' daemon
b
my $stream = b('lalala');
Turn string into a Mojo::ByteStream object.
$ perl -Mojo -E 'b(g("mojolicio.us")->body)->html_unescape->say'
c
my $collection = c(1, 2, 3);
Turn list into a Mojo::Collection object.
d
my $res = d('mojolicio.us');
my $res = d('http://mojolicio.us' => {DNT => 1} => 'Hi!');
Perform DELETE
request with "delete" in Mojo::UserAgent and return resulting Mojo::Message::Response object.
g
my $res = g('mojolicio.us');
my $res = g('http://mojolicio.us' => {DNT => 1} => 'Hi!');
Perform GET
request with "get" in Mojo::UserAgent and return resulting Mojo::Message::Response object.
$ perl -Mojo -E 'say g("mojolicio.us")->dom("h1, h2, h3")->pluck("text")'
h
my $res = h('mojolicio.us');
my $res = h('http://mojolicio.us' => {DNT => 1} => 'Hi!');
Perform HEAD
request with "head" in Mojo::UserAgent and return resulting Mojo::Message::Response object.
j
my $bytes = j({foo => 'bar'});
my $array = j($bytes);
my $hash = j($bytes);
Encode Perl data structure or decode JSON with Mojo::JSON.
$ perl -Mojo -E 'b(j({hello => "world!"}))->spurt("hello.json")'
o
my $res = o('mojolicio.us');
my $res = o('http://mojolicio.us' => {DNT => 1} => 'Hi!');
Perform OPTIONS
request with "options" in Mojo::UserAgent and return resulting Mojo::Message::Response object.
p
my $res = p('mojolicio.us');
my $res = p('http://mojolicio.us' => {DNT => 1} => 'Hi!');
Perform POST
request with "post" in Mojo::UserAgent and return resulting Mojo::Message::Response object.
r
my $perl = r({data => 'structure'});
Dump a Perl data structure with Data::Dumper.
perl -Mojo -E 'say r(g("mojolicio.us")->headers->to_hash)'
t
my $res = t('mojolicio.us');
my $res = t('http://mojolicio.us' => {DNT => 1} => 'Hi!');
Perform PATCH
request with "patch" in Mojo::UserAgent and return resulting Mojo::Message::Response object.
u
my $res = u('mojolicio.us');
my $res = u('http://mojolicio.us' => {DNT => 1} => 'Hi!');
Perform PUT
request with "put" in Mojo::UserAgent and return resulting Mojo::Message::Response object.
x
my $dom = x('<div>Hello!</div>');
Turn HTML/XML input into Mojo::DOM object.
$ perl -Mojo -E 'say x(b("test.html")->slurp)->at("title")->text'