$_ = "abcd_efgh-1.2.3-hjik-3.4.5.tar.gz"; /^(\w+-(?:\d|\.)+)[$-]?/; print $1;