build.pl (ebbdc707) | build.pl (0a44ccb0) |
---|---|
1: 2 eval 'exec perl -S $0 ${1+"$@"}' 3 if 0; 4#************************************************************** 5# 6# Licensed to the Apache Software Foundation (ASF) under one 7# or more contributor license agreements. See the NOTICE file 8# distributed with this work for additional information --- 2003 unchanged lines hidden (view full) --- 2012 getcwd(); 2013 2014 if ($html) { 2015 my $log_file = $jobs_hash{$registered_name}->{LONG_LOG_PATH}; 2016 my $log_dir = File::Basename::dirname($log_file); 2017 if (!-d $log_dir) { 2018 system("$perl $mkout"); 2019 }; | 1: 2 eval 'exec perl -S $0 ${1+"$@"}' 3 if 0; 4#************************************************************** 5# 6# Licensed to the Apache Software Foundation (ASF) under one 7# or more contributor license agreements. See the NOTICE file 8# distributed with this work for additional information --- 2003 unchanged lines hidden (view full) --- 2012 getcwd(); 2013 2014 if ($html) { 2015 my $log_file = $jobs_hash{$registered_name}->{LONG_LOG_PATH}; 2016 my $log_dir = File::Basename::dirname($log_file); 2017 if (!-d $log_dir) { 2018 system("$perl $mkout"); 2019 }; |
2020 $error_code = system ("$job_to_do 2>&1 | tee $log_file"); | 2020 $error_code = system ("$job_to_do > $log_file 2>&1"); 2021 if (!$grab_output && -f $log_file) { 2022 system("cat $log_file"); 2023 }; |
2021 } else { 2022 $error_code = system ("$job_to_do"); 2023 }; 2024 return $error_code; 2025}; 2026 2027sub do_custom_job { 2028 my ($module_job, $dependencies_hash) = @_; --- 1537 unchanged lines hidden --- | 2024 } else { 2025 $error_code = system ("$job_to_do"); 2026 }; 2027 return $error_code; 2028}; 2029 2030sub do_custom_job { 2031 my ($module_job, $dependencies_hash) = @_; --- 1537 unchanged lines hidden --- |