unless ( $display =~ /^[a-z0-9\-\.]+$/ ) { # Invalid input }