sub anki_import { my $file = shift; opt verbose => ( isa => 'Bool', alias => 'v', comment => 'provide details on progress of Anki::Import' ); opt vverbose => ( isa => 'Bool', alias => 'vv', comment => 'verbose information plus debug info' ); my $args = optargs( @_ ); if ($args->{verbose}) .... } }