Help for this page

Select Code to Download


  1. or download this
    use Inline 'C', <<'END_C'

...
my $pack1 = pack "d$size", 1, 2, 3;
my $pack2 = pack "d$size", 4, 5, 6;
_munge( $out, $size, $pack1, $pack2 );
  2. or download this
    0.000000 0.000000
0.000000 0.000000
0.000000 0.000000