fixed asterisk perl libabry