main.pl
...

my $cmd=" perl C:\\ia\\getset_build_num.pl -mode get -p $outputname -t $build_num_template -c $build_num_config";
      
my ($build_number,$message)= system($cmd);