Help for this page

Select Code to Download


  1. or download this
    my $pinc = join('', $data1, $data2, $data3);
my $pin = sprintf('%04d', unpack('N', md5($pinc)) % 10000);
  2. or download this
    my $pinc = join('', $data1, $data2, $data3);
my $pin = sprintf('%04d', unpack('%32C*', $pinc) % 10000);