BEGIN {
if (! -d "bin" || ! -d "SL") {
- print("This tool must be run from the Lx-Office ERP base directory.\n");
+ print("This tool must be run from the kivitendo ERP base directory.\n");
exit(1);
}
die "file '$full_filename' already exists, aborting" if -f $full_filename;
- open my $fh, ">:utf8", $full_filename or die "can't open $full_filename";
+ open my $fh, ">:encoding($encoding)", $full_filename or die "can't open $full_filename";
print $fh "$comment \@tag: $filename\n";
print $fh "$comment \@description: $description\n";
print $fh "$comment \@depends: @depends\n";