&help unless (($opt_d, $opt_e) =~ /(\d{2})\/(\d{2})\/(\d{4})(.*?)$/);