Method Modifiers
package App::TimeTracker::Command::Git; use Moose::Role; use Git::Repository; has 'branch' => ( is=>'rw', isa=>'Str', documentation=>'Git: Branch name', ); after 'cmd_start' => sub { my $self = shift; return unless $self->branch; return if $self->no_branch; # set up a new git branch named after the value of --branch # implementation is boring };