Select Code to Download

if ( defined $operator and $operator =~ /\S/ ) {
  #print operator here
...
  #not defined or it does not contain a
  #non whitespace character
}