Flag a perl variable as boolean