From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

#!/usr/bin/perl
use strict;
BEGIN {
plan skip_all => "Digest::SHA1 is required for this test" unless eval { require Digest::SHA1 };
plan "no_plan";
}
use lib 't/lib';
use Catalyst::Test qw/AuthTestApp/;
ok(get("/moose"), "get ok");