if  ($port111 =~ /^(\d{1,2})\/(\d{1,2})\/(\d{1,2})$/) {print "yes port111=$port111\n";}