# try_AspectPrecon1.pl use strict ; use warnings; use AspectPrecon qw/ pre_insert /; pre_insert()->enable; sub insert_alias {print "insert $_[0]\n"; return 1} insert_alias('Mike'); insert_alias('SAINT'); __END__ Sorry, SAINT has been reserved. at try_AspectPrecon1.pl line 10 main::insert_alias(Mike) is being called. insert Mike main::insert_alias(SAINT) is being called.