So even if you wrote a module to capture a more precise time, it couldn't be stored in $^T because that scalar is too magic.
If something were to replace $^T, it would also replace the magic.
>perl -E"undef(*^T); $^T = 1400000000.123; say $^T;"
1400000000.123
Well, the floating point number is actually stored correctly in Perl's SV structure.
When assigning to a variable with set magic, the value is assigned as normal, then the magic handler is called.
When fetching from a magical variable with get magic, the magic handler is called to replace the value of the variable, then the fetch happens as normal.
This means you see the value assigned to the scalar in the scalar, but that value is meaningless because it gets clobbered when you read from the scalar.
The magic behind $^T is equivalent to the following:
use Variable::Magic qw( cast wizard );
# The C var $^T mirrors is named PL_basetime
# An IV (signed integer) on all systems except OS/2 and VMS.
my $PL_basetime;
cast($^T, wizard(
# Copies into $^T before fetching from it.
get => sub { ${ $_[0] } = $PL_basetime; },
# Copies from $^T after assigning to it.
set => sub { $PL_basetime = ${ $_[0] }; },
));
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.