Use better perl construct for empty string