*var = \3.14159;
our $var;
print $var;