[perl #121028] avoid creating a shell process