Scroll to navigation

ojo(3pm) User Contributed Perl Documentation ojo(3pm)

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('/' => 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("/" => {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.

"f"

  my $res = f('http://kraih.com' => {a => 'b'});
  my $res = f('kraih.com' => 'UTF-8' => {a => 'b'} => {DNT => 1});
Perform "POST" form request with "post_form" 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.

"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.

"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.

"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 HTML5/XML input into Mojo::DOM object.
  $ perl -Mojo -E 'say x("<div>Hello!</div>")->at("div")->text'

SEE ALSO

Mojolicious, Mojolicious::Guides, <http://mojolicio.us>.
2012-09-05 perl v5.14.2