教えていただきたいのですが、

型グロブを使って引数を扱おうとおもい
単純なものを書いたのですが
下のエラーがでてしまいどうしてよいかこまっています。
引数には単純なハッシュを入れる予定です。
どなたかご指導して頂けませんでしょうか。

Variable "%ABC" is not imported at Test.pm line 8.
Global symbol "%ABC" requires explicit package name at Test.pm line 8.

#!/usr/bin/perl

use strict;

sub test {
local(*ABC) = @_;

print keys(%ABC);

}

1;