if (defined ($q->param('foo')) {
  print "foo is defined!\n";
  print "foo = ", $q->param('foo'), "\n";
}