# $a =~ /:/
index($a, ":") >= 0