my( $a, $b, $c ) = unpack 'VVd', $someStringReturnedFromC;

my $stringToPassToC = pack 'VVd', 12345, 98765, 3.141592653;