my @Jira_command_line= qw/newbug $Jira_bug_category $Jira_bug_number
 trunk $TRUNK $sernum/;
print "Calling '",join(',',@Jira_command_line),"'\n";
$i = system(@Jira_command_line);