oh magari tu vuoi che alla variabile non definita venga attribuito un valore di default:

codice:
use strict;
use warnings,
use CGI;

my $q = new CGI();

my $valore = $q->param('var1');
$valore = "non mi è arrivato nessun valore" unless $valore;