if($view_tag =~ m/\A[A-Za-z0-9][A-Za-z0-9_\-\.]+\z/) {
    # everything is OK
} else {
    die "Invalid/disallowed filename '$view_tag'";
};