it is easy to do with two regexes, such as:

$f =~ /^[\w\.]+$/ 
&&
$f =~ /^\w/
[download]

The first checks what the entire filename consists of, and the second checks the leading letter. There are endless variations on the same idea.