Help for this page

Select Code to Download


  1. or download this
    sub make_key {
      my $x = shift;
      pack 'N*', @{$x->{Path}};
    }