Quote the bareword:
tie %Directory, 'Tie::Dir', '.', DIR_UNLINK; # ^ ^ [download]
In reply to Re: Using Tie::Dir by stevieb in thread Using Tie::Dir by PriNet