dancer

0热度

2回答

如何使用Dancer2 :: Plugin :: Auth :: Extensible处理锁定/禁用的用户帐户？

我目前正在将CGI应用程序迁移到Dancer2。我以前使用了使用MySQL的“手工制作”身份验证机制，并使用了属性为email,password和state的用户表。 state表示账户是active还是locked。 locked表示帐户被禁用（逻辑删除）。我也有表roles和user_roles来实现我的两个角色：管理员和用户。一切工作就像一个魅力，但有一个例外：用我的旧的“手工制作”的

-4热度

1回答

如何将多个列名传递给Perl Dancer的quick_select方法？

我正尝试使用Perl Dancer quick_select来快速从数据库中提取行。我使用的是从我得到了这样的用户的项目清单：my @arr=split(/,/, $inline); 我一直使用的项目从用户，当收到此错误： DBD::mysql::db selectall_arrayref failed: Unknown column 'val2' in 'where clause' 这确实不行：

0热度

1回答

如何允许多个连接到Dancer2

我使用Perl Dancer2与基本设置的RESTful服务框架（使用命令 dancer2 -a MyWeb即可::应用生成模板文件并在自动生成的MyWeb-App/lib/MyWeb/App.pm文件中添加“get”路由）。最近我发现，当一个请求需要很长一段时间才能完成，服务器被锁定，只能提供该请求。例如 get '/' => sub {# simple request to redirect

-1热度

1回答

Perl5 DBI Mysql：获取last_insert_id的可靠方法

在我的代码中，我使用database->last_insert_id(undef,undef,undef,"id");来获取自动增量主键。这工作99.99％的时间。但偶尔会返回0值。在这种情况下，使用与INSERT语句的值类似的WHERE子句运行select将显示insert成功。指示last_insert_id方法未能获得正确的数据。这是一个已知的问题已知的修复？或者我应该跟踪每次调用las

5热度

1回答

如何配置Dancer2和模板工具包使用不同的藏匿模块

我将如何修改模板工具包的默认配置在Dancer2网站利用Template::Stash::AutoEscaping？

2热度

1回答

如何访问Dancer2的会话对象？

我为我的网络应用使用了Dancer2和YAML会话引擎。我config.yml包含 engines: session: YAML: ... cookie_duration: 5 minutes ... 我想显示类似“你的会议X分钟后过期”。如何访问此值，即如何访问我的路由中的$session对象？随着DSL关键字session我只能

0热度

2回答

请求的结果不显示在模板工具包中

我有一个带有计算机表的SQLite数据库。我在电脑桌上有两排。我想要得到所有电脑，并在模板工具包模板中显示结果。这是 Dancer2 控制器代码，它使用 Dancer2::Plugin::Auth::Tiny 和 Dancer2::Plugin::DBIC get '/listallmachine' => needs login => sub { my $computerRs = s

0热度

1回答

未能通过CPAN测试构建Dancer2 :: Plugin :: Auth :: OAuth

我试图从CPAN构建Dancer2::Plugin::Auth::OAuth模块。测试失败： Running Build test t/01-dancer.t .......... 1/? # Failed test '[github] Session data' # at t/01-dancer.t line 238. # Structures begin differing at:

-1热度

2回答

的Perl Dancer2验证密码管理

那么谁使用perl的舞者任何一个人都知道，在登录时，用户可以调用的authenticate_user authenticate_user( params->{username}, params->{password} ); 这是验证::扩展插件的一部分进行身份验证。对我来说，它看起来像它鼓励使用纯文本存储密码！当然，你可以首先散列密码，然后确保存储的密码是相同的散列，但这似乎是更多

5热度

1回答

如何将调试器附加到Dancer2应用程序中

请耐心等待，因为我并不真正了解Dancer2的第一件事，除了我继承了用它编写的东西。我想附加一个普通的调试器，它勇敢地抵制我的大部分尝试。说我有： package Wharrgarbl; use Dancer2; # lots of stuff get '/wharrgarbl/:potato' => sub { use DB; $DB::single = 1;