翻译my $Queue_para=(defined $Queue)?"-queue $Queue":'';

#!/usr/bin/perl

my $Queue_para=(defined $Queue)?"-queue $Queue":'';

my $Q="";
my $Q1;
if (defined $Q)
{
$Q1="-queue $Q";
print "$Q1\n";
}
else
{
$Q1="\n";
print "$Q1\n";
}