no one mentioned my personal favorite: setting a default value using the or operator...

$myvariable = $q->param( "myinput" ) || ""; 
if ($myvariable eq "")
{
   # no warnings
}
[download]