pritesh@mintpad ~ $ perl test_my_var_loc.pl 
Outside the functions $val is 10 stored at SCALAR(0xb2d7c8)
In the first function $val is 200 stored at SCALAR(0xb2d888)
After first function, before second function,  $val is 10 stored at SCALAR(0xb2d7c8)
In the second function $val is 100 stored at SCALAR(0xb2e290)
After second function,  $val is 10 stored at SCALAR(0xb2d7c8)
pritesh@mintpad ~ $