# perl -w -MTie::Scalar -e 'print "$Tie::Scalar::VERSION\n"'
1.00