#!/usr/bin/perl
my $Queue_para=(defined $Queue)?"-queue $Queue":'';
my $Q="";
my $Q1;
if (defined $Q)
{
$Q1="-queue $Q";
print "$Q1
";
}
else
{
$Q1="
";
print "$Q1
";
}
#!/usr/bin/perl
my $Queue_para=(defined $Queue)?"-queue $Queue":'';
my $Q="";
my $Q1;
if (defined $Q)
{
$Q1="-queue $Q";
print "$Q1
";
}
else
{
$Q1="
";
print "$Q1
";
}