##
my $x = '';
####
defined($x) or confess;
####
mysub($user_data)
{
$user_$data->{invoice_number} ...
}
mysub({age => $user_age, inovice_number = $invoice_number}) # TYPO!
####
mysub($user_data)
{
defined($user_$data->{invoice_number}) or confess;
$user_$data->{invoice_number} ...
}
mysub({age => $user_age, inovice_number = $invoice_number}) # TYPO!