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
|
use Test::More import => ['!pass'];
my @keywords = qw(
after
any
before
before_template
cookie
cookies
config
content_type
dance
debug
del
dirname
error
false
forward
from_dumper
from_json
from_yaml
from_xml
get
halt
header
headers
hook
layout
load
load_app
logger
mime
options
param
params
pass
path
post
prefix
push_header
put
redirect
request
send_file
send_error
set
setting
set_cookie
session
splat
status
start
template
to_dumper
to_json
to_yaml
to_xml
true
upload
captures
uri_for
var
vars
warning
);
plan tests => scalar(@keywords);
use Dancer ':syntax';
foreach my $symbol (@keywords) {
ok(exists($::{$symbol}), "symbol `$symbol' is exported");
}
|