vti

class Foo {
    method foo () {
        ROUTE: for ^1 {
        }
    }
}

vti

#!/bin/sh

#set -x

FILE=$1
DEV=$2

MOUNT=/tmp/garmin
FILE_BASENAME="${FILE%.gpx}"
FILE_DATES="$FILE_BASENAME-dates.gpx"

vti

use strict;
use warnings;

use HTTP::Tiny;

{
    my $ua = HTTP::Tiny->new();

    my $request  = '';
    my $response = '';

vti

content - контент
escaping - экранирование
footer - подвал
header - шапка
helper
layout - общий шаблон
plain text - текст без форматирования
plugin - расширение
raw bytes
render

vti

#!/usr/bin/env perl

use strict;
use warnings;

use Mojo::DOM;
use Data::Dumper;

my $file;

vti

maestro% ~/dev/mojo/script/mojo get --header http://ya.ru
Connection: Keep-Alive
Date: Fri, 16 Jul 2010 11:15:33 GMT
Server: Mojolicious (Perl)
Content-Length: 38
Content-Type: text/plain

Congratulations, your Mojo is working!Couldn't open page "--header".

vti

#!/usr/bin/env perl

use strict;
use warnings;

my $query = join ' ' => @ARGV;
my $url = 'http://www.google.com/search';

use Mojo::Client;
use Mojo::URL;

vti

#!/usr/bin/env perl

use strict;
use warnings;

use Mojo::Client;

my $client = Mojo::Client->new;

my $news = 'http://digg.com';

vti

#!/usr/bin/env perl

use strict;
use warnings;

use FindBin;

BEGIN {
    use lib "/Users/vti/dev/protocol-websocket/lib";
}

vti

$app = Plack::Middleware::ReverseProxy->wrap($app);
$app = Plack::Middleware::RestrictedJSONP->wrap($app, path => qr{^/(?:author|release|pod)(?:$|/)});