perl -lwe "open my $fh, '>', 'test'; print 0 + $fh; print + $fh"

16950176
GLOB(0x102a3a0)

# ..and no: 16950176 is not the sum of numerical values of characters
perl -wle "$str = q!GLOB(0x102a3a0)!; for (split '',$str){ print qq($_ = ),ord($_);$res += ord($_);} print $res"

G = 71
L = 76
O = 79
B = 66
( = 40
0 = 48
x = 120
1 = 49
0 = 48
2 = 50
a = 97
3 = 51
a = 97
0 = 48
) = 41
981