my $var; print_name $var;