-command => [\&Account_Setup, $acct]

##</code><code>##

-command => [\&Account_Setup, \$acct]

##</code><code>##

sub Account_Setup {
    my $acct_type = ${shift()};
    print "Account Type: $acct_type\n";
}