Add '(void)'  to fix perl.c unused-value warning message
Merge pull request #560 from RichardHitt/warning-fix

Add '(void)'  to fix perl.c unused-value warning message