- unless($$Config[$i]{'ngs'} =~ /^\S+$/) {
- $Error .= "E: The Newsgroups-header for your project \"$$Config[$i]{'name'}\" contains whitespaces.\n"
+ unless(defined($$Config[$i]{'file'}) && -f $$Config[$i]{'file'}) {
+ $Error .= "E: The file to post for your project \"$$Config[$i]{'name'}\" is not defined or does not exist.\n"
+ }
+ unless(defined($$Config[$i]{'from'}) && $$Config[$i]{'from'} =~ /\S+\@(\S+\.)?\S{2,}\.\S{2,}/) {
+ $Error .= "E: The From header for your project \"$$Config[$i]{'name'}\" seems to be incorrect.\n"
+ }
+ unless(defined($$Config[$i]{'ngs'}) && $$Config[$i]{'ngs'} =~ /^\S+$/) {
+ $Error .= "E: The Newsgroups header for your project \"$$Config[$i]{'name'}\" is not defined or contains whitespaces.\n"
+ }
+ unless(defined($$Config[$i]{'subject'})) {
+ $Error .= "E: The Subject header for your project \"$$Config[$i]{'name'}\" is not defined.\n"