diff --git a/cfgs/config/xlatcfg.pl b/cfgs/config/xlatcfg.pl index 808408b..25e5c58 100755 --- a/cfgs/config/xlatcfg.pl +++ b/cfgs/config/xlatcfg.pl @@ -21,7 +21,17 @@ my $dir=$ARGV[0], $out=$ARGV[1]; my @files=<$dir/*.chs>; +if( $#files < 0 ){ + die "$dir/ don't contains files like *.chs, exit\n"; +} open OUT, ">$out" || die "Can't open/create file '$out': $!\n"; +print OUT <