The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package MojoliciousTest::Command::test_command;
use Mojo::Base 'Mojolicious::Command';

use Mojo::Util 'getopt';

sub run {
  my ($self, @args) = @_;
  getopt \@args, ['default'], 'too' => \my $too;
  return $too ? 'works too!' : 'works!';
}

1;