This is just plain bad and evil and it doesn't buy you anything--rather the opposite--but TMTOWTDI and it uses what many would call "magic":

{
    local *_ = \@a;
    unshift @_, 'add_test';
    &setmode;
}
[download]

I'm not even sure why I wrote this, other than it is possible and perhaps could be fun.

ihb