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

use strict;
use Moose;
use Types::Standard qw/Str Bool/;
with 'Badge::Depot';
has username => (
is => 'ro',
isa => Str,
);
sub BUILD {
my $self = shift;
$self->link_url(sprintf q{https://travis-ci.org/%s}, $self->username);
}
1;