Fixes: #3009 perl error : Global symbol