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 ---