Select Code to Download

use constant XXX => 'cccc';

...
given ($self->{auth_mode}) {
    when (XXX) {  ... }
};