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

#!/usr/bin/perl
use strict;
use utf8;
use Test::More tests => 2;
our $config;
eval {
$config = App::Music::ChordPro::Config::configurator;
};
!$config && diag("$@");
ok($config, "Configuration set up");
my $s = App::Music::ChordPro::Songbook->new;
ok($s, "Song set up");