Help for this page
print $op if defined($op) and $op =~ /\S/;
print $op if defined($op) and $op !~ /\s/;