moses-smt/mosesdecoder
1
1
Fork 0
mirror of https://github.com/moses-smt/mosesdecoder.git synced 2024-12-28 14:32:38 +03:00
Code Issues Packages Projects Releases Wiki Activity

Minor change: make concatenatiton operations on filenames portable.

Browse Source
This commit is contained in:
Tetsuo Kiso 2011-12-09 02:14:41 +09:00
parent 108cd42915
commit ef76d89f38
1 changed files with 8 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
scripts/training/mert-moses.pl
View File

@ -1305,19 +1305,16 @@ sub submit_or_exec {
sub create_extractor_script()
{
my ($cmd, $outdir) = @_;
my $script_path = File::Spec->catfile($outdir, "extractor.sh");
my $script_path = $outdir."/extractor.sh";
open(OUT,"> $script_path")
or die "Can't write $script_path";
print OUT "#!/bin/bash\n";
print OUT "cd $outdir\n";
print OUT $cmd."\n";
close(OUT);
open my $out, '>', $script_path
or die "Couldn't open $script_path for writing: $!\n";
print $out "#!/bin/bash\n";
print $out "cd $outdir\n";
print $out "$cmd\n";
close($out);
`chmod +x $script_path`;
return $script_path;
return $script_path;
}