my $xyz = 15; my $var = &example($xyz); print &example($xyz); sub example { my $tmp = shift || 0; my $tmp += 49; return $tmp }