This file is indexed.

/usr/bin/dancer2 is in libdancer2-perl 0.11+dfsg-1.

This file is owned by root:root, with mode 0o755.

The actual contents of the file can be viewed below.

  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
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
#!/usr/bin/perl 

eval 'exec /usr/bin/perl  -S $0 ${1+"$@"}'
    if 0; # not running under some shell
# PODNAME: dancer2
# ABSTRACT: Dancer2 command line interface

use strict;
use warnings;
use Dancer2::CLI;

# backward compatibility
if (@ARGV && ($ARGV[0] =~ m/^-(a|p|x)/ || $ARGV[0] =~ m/^--(application|path|no-check)/)) {
    # GetOptions and Getopt::Long::Descriptive differently treats
    # cases like '-a=Test'. GetOptions returs 'Test' as value of 'a',
    # while Getopt::Long::Descriptive returns '=Test' as value
    foreach (@ARGV) {
        s/^\-(a|p)=/-$1/;
    }

    unshift @ARGV, 'gen';
}


exit Dancer2::CLI->run;

__END__

=pod

=head1 NAME

dancer2 - Dancer2 command line interface

=head1 VERSION

version 0.11

=head1 SYNOPSIS

dancer2 <command> [options...]

=head1 DESCRIPTION

Dancer2 is the new generation lightweight web-framework for Perl.
This tool provides nice, easily-extendable CLI interface for it.

=head1 NAME

dancer2 - Dancer2 command line interface

=head1 COMMANDS

=over

=item gen                   : create new Dancer2 application

=item commands              : list the application's commands

=item help                  : display a command's help screen

=item version               : display version

=back

To get detailed description of each individual command run:
    dancer2 help <command>

The lastest list of available commands can be dispayed by:
    dancer2 commands

=head1 COMMAND 'gen'

Helper script for providing a bootstrapping method to quickly and easily create
the framework for a new Dancer2 application.

=head3 OPTIONS

        -a --application     the name of your application
        -p --path            the path where to create your application
                             (current directory if not specified)
        -o --overwrite       overwrite existing files
        -x --no-check        don't check for the latest version of Dancer2
                             (checking version implies internet connection)

=head3 EXAMPLE

Here is an application created with dancer2:

    $ dancer2 gen -a MyWeb::App
    + MyWeb-App
    + MyWeb-App/bin
    + MyWeb-App/bin/app.pl
    + MyWeb-App/config.yml
    + MyWeb-App/environments
    + MyWeb-App/environments/development.yml
    + MyWeb-App/environments/production.yml
    + MyWeb-App/views
    + MyWeb-App/views/index.tt
    + MyWeb-App/views/layouts
    + MyWeb-App/views/layouts/main.tt
    + MyWeb-App/MANIFEST.SKIP
    + MyWeb-App/lib
    + MyWeb-App/lib/MyWeb
    + MyWeb-App/lib/MyWeb/App.pm
    + MyWeb-App/public
    + MyWeb-App/public/css
    + MyWeb-App/public/css/style.css
    + MyWeb-App/public/css/error.css
    + MyWeb-App/public/images
    + MyWeb-App/public/500.html
    + MyWeb-App/public/404.html
    + MyWeb-App/public/dispatch.fcgi
    + MyWeb-App/public/dispatch.cgi
    + MyWeb-App/public/javascripts
    + MyWeb-App/public/javascripts/jquery.js
    + MyWeb-App/t
    + MyWeb-App/t/002_index_route.t
    + MyWeb-App/t/001_base.t
    + MyWeb-App/Makefile.PL

The application is ready to serve:

    $ cd MyWeb-App
    $ ./bin/app.pl
    >> Listening on 127.0.0.1:3000
    == Entering the development dance floor ...

=head1 AUTHOR

This script has been written by Ivan Kruglov
<ivan.kruglov@yahoo.com> base on original dancer2
script which has been written by Sebastien Deseille
<sebastien.deseille@gmail.com> and Alexis Sukrieh
<sukria@cpan.org>.

=head1 SOURCE CODE

See L<Dancer2> for more information.

=head1 LICENSE

This module is free software and is published under the same
terms as Perl itself.

=head1 AUTHOR

Dancer Core Developers

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Alexis Sukrieh.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut