# Import nothing, but use the tied hash interface.
use Tie::ArrayAsHash;

# Import 'aeach'.
use Tie::ArrayAsHash qw(aeach);

# Import 'aeach', but call it 'each'.
use Tie::ArrayAsHash qw(each);

# Import 'aeach' with both names.
use Tie::ArrayAsHash qw(-all);

# Import 'each' if Perl lt 5.11.0; import 'aeach' regardless.
use Tie::ArrayAsHash qw(-auto);

# Import 'aeach' renamed it to whatever you like.
use Tie::ArrayAsHash aeach => { -as => 'p512each' };