$ perl -MDP -wE'DPeek for DDual Data::Peek::triplevar"\x{03c0}",3,3.14159265'
PV("\317\200"\0) [UTF8 "\x{3c0}"]
IV(3)
NV(3.14159)
SV_UNDEF
IV(0)